Mercurial > emacs
changeset 96169:abc9f7184a8c
(fixed-pitch): Use "Monospace" family.
(variable-pitch): Use "Sans" family.
(face-font-family-alternatives): Define alternatives for "Sans"
and "Monospace".
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sat, 21 Jun 2008 19:42:51 +0000 |
| parents | fb2bc15fe833 |
| children | a1ceb508623d |
| files | lisp/faces.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Sat Jun 21 19:42:37 2008 +0000 +++ b/lisp/faces.el Sat Jun 21 19:42:51 2008 +0000 @@ -61,7 +61,9 @@ ;; This is defined originally in xfaces.c. (defcustom face-font-family-alternatives - '(("courier" "fixed") + '(("Monospace" "courier" "fixed") + ("courier" "fixed") + ("Sans" "helv" "helvetica" "arial" "fixed") ("helv" "helvetica" "arial" "fixed")) "*Alist of alternative font family names. Each element has the form (FAMILY ALTERNATIVE1 ALTERNATIVE2 ...). @@ -2220,12 +2222,12 @@ :group 'basic-faces) (defface fixed-pitch - '((t :family "courier")) + '((t :family "Monospace")) "The basic fixed-pitch face." :group 'basic-faces) (defface variable-pitch - '((t :family "helv")) + '((t :family "Sans")) "The basic variable-pitch face." :group 'basic-faces)