mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Fix autoload directives in lisp/face-remap.el

Browse source 
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1271
This commit is contained in:
Miles Bader 2008-06-21 06:51:23 +00:00
parent 0e90a43c18
commit 23b77eee7e
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/face-remap.el
View file

@ -103,7 +103,7 @@ The list structure of ENTRY may be destructively modified."
(setcdr entry (sort (cdr entry) 'face-attrs-more-relative-p))
(nreverse entry))
;;;### autoload
;;;###autoload
(defun face-remap-add-relative (face &rest specs)
"Add a face remapping entry of FACE to SPECS in the current buffer.
@ -146,7 +146,7 @@ COOKIE should be the return value from that function."
(remq remapping face-remapping-alist)))
(cdr cookie))))))
;;;### autoload
;;;###autoload
(defun face-remap-reset-base (face)
"Set the base remapping of FACE to inherit from FACE's global definition."
(let ((entry (assq face face-remapping-alist)))
@ -160,7 +160,7 @@ COOKIE should be the return value from that function."
(remq entry face-remapping-alist))
(setcar (last entry) face))))) ; otherwise, just inherit global def
;;;### autoload
;;;###autoload
(defun face-remap-set-base (face &rest specs)
"Set the base remapping of FACE in the current buffer to SPECS.
If SPECS is empty, the default base remapping is restored, which
@ -377,7 +377,7 @@ including a face name, a list of face names, or a face-attribute
If INTERACTIVE is non-nil, a message will be displayed describing the result.
This is a wrapper function which calls just `buffer-face-set' or
This is a wrapper function which calls `buffer-face-set' or
`buffer-face-toggle' (depending on ARG), and prints a status
message in the echo area. In many cases one of those functions
may be more appropriate."