Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 10:27:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

Move face setup to faces.el.

Browse source
This commit is contained in:
Richard M. Stallman 1997-05-25 21:55:52 +00:00
parent 55893d25c0
commit 5e4447f1e4
1 changed files with 0 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
lisp/cus-start.el
View file

@ -213,23 +213,4 @@
;; Set the type.
(put symbol 'custom-type type))))
;; Add support for build in faces.
(let ((all '((bold "Use bold font.")
(bold-italic "Use bold italic font.")
(italic "Use italic font.")
(underline "Underline text.")
(default "Used for text not covered by other faces.")
(highlight "Highlight text in some way.")
(modeline "Used for displaying the modeline.")
(region "Used for displaying the region.")
(secondary-selection
"Used for displaying the secondary selection.")))
entry symbol doc)
(while all
(setq entry (car all)
all (cdr all)
symbol (nth 0 entry)
doc (nth 1 entry))
(put symbol 'face-documentation doc)))
;;; cus-start.el ends here.