Mercurial > emacs
comparison lisp/faces.el @ 3910:22b4b8fcda3e
Doc fix.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Mon, 28 Jun 1993 19:56:00 +0000 |
parents | 5c622d3241b5 |
children | 06dbadd0e4a7 |
comparison
equal
deleted
inserted
replaced
3909:192e7aa8389a | 3910:22b4b8fcda3e |
---|---|
616 (if font (internal-try-face-font face font frame))) | 616 (if font (internal-try-face-font face font frame))) |
617 (or (not (equal ofont (face-font face))) | 617 (or (not (equal ofont (face-font face))) |
618 (and (not noerror) | 618 (and (not noerror) |
619 (error "No unitalic version of %S" font1))))) | 619 (error "No unitalic version of %S" font1))))) |
620 | 620 |
621 ;;; Make the builtin faces; the C code knows these as faces 0, 1, and 2, | 621 ;;; Make the default and modeline faces; the C code knows these as |
622 ;;; respectively, so they must be the first three faces made. | 622 ;;; faces 0 and 1, respectively, so they must be the first two faces |
623 | 623 ;;; made. |
624 (defun face-initialize () | 624 (defun face-initialize () |
625 (make-face 'default) | 625 (make-face 'default) |
626 (make-face 'modeline) | 626 (make-face 'modeline) |
627 (make-face 'highlight) | 627 (make-face 'highlight) |
628 ;; | 628 ;; |