From 0e0d5683812fe9d4b77355291e9efd8ed8873d64 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 19 Feb 2005 13:27:09 +0000 Subject: [PATCH] (escape-glyph, minibuffer-prompt, button): Add commentary for the reasons we use "type pc" in these faces. --- lisp/ChangeLog | 7 +++++++ lisp/button.el | 1 + lisp/faces.el | 5 +++++ 3 files changed, 13 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9ea146cd6c6..8a535f6e32c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2005-02-19 Eli Zaretskii + + * faces.el (escape-glyph, minibuffer-prompt): Add commentary for + the reasons we use "type pc" in these faces. + + * button.el (button): Ditto. + 2005-02-19 Michael Mauger * replace.el (query-replace-read-from): Set the value of diff --git a/lisp/button.el b/lisp/button.el index dcd26846d10..5f9b5094e6c 100644 --- a/lisp/button.el +++ b/lisp/button.el @@ -50,6 +50,7 @@ ;; Globals +;; Use color for the MS-DOS port because it doesn't support underline. (defface button '((((type pc) (class color)) (:foreground "lightblue")) (t :underline t)) diff --git a/lisp/faces.el b/lisp/faces.el index 1a868b4537c..e448ab4f13d 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1880,6 +1880,9 @@ created." (defface minibuffer-prompt '((((background dark)) :foreground "cyan") + ;; Don't use blue because many users of + ;; the MS-DOS port customize their + ;; foreground color to be blue. (((type pc)) :foreground "magenta") (t :foreground "dark blue")) "Face for minibuffer prompts." @@ -2047,6 +2050,8 @@ Note: Other faces cannot inherit from the cursor face." :group 'basic-faces) (defface escape-glyph '((((background dark)) :foreground "cyan") + ;; See the comment in minibuffer-prompt for + ;; the reason not to use blue on MS-DOS. (((type pc)) :foreground "magenta") (t :foreground "blue")) "Face for characters displayed as ^-sequences or \-sequences." -- 2.39.2