aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2005-02-19 13:27:09 +0000
committerEli Zaretskii2005-02-19 13:27:09 +0000
commit0e0d5683812fe9d4b77355291e9efd8ed8873d64 (patch)
treea58b2ddac1c30f3ce9dd03c536e116ad7d00c2ac
parent270a576a4222c76b9483a322769fc4d3d2e29a82 (diff)
downloademacs-0e0d5683812fe9d4b77355291e9efd8ed8873d64.tar.gz
emacs-0e0d5683812fe9d4b77355291e9efd8ed8873d64.zip
(escape-glyph, minibuffer-prompt, button): Add commentary for
the reasons we use "type pc" in these faces.
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/button.el1
-rw-r--r--lisp/faces.el5
3 files changed, 13 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9ea146cd6c6..8a535f6e32c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
12005-02-19 Eli Zaretskii <eliz@gnu.org>
2
3 * faces.el (escape-glyph, minibuffer-prompt): Add commentary for
4 the reasons we use "type pc" in these faces.
5
6 * button.el (button): Ditto.
7
12005-02-19 Michael Mauger <mmaug@yahoo.com> 82005-02-19 Michael Mauger <mmaug@yahoo.com>
2 9
3 * replace.el (query-replace-read-from): Set the value of 10 * 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 @@
50 50
51;; Globals 51;; Globals
52 52
53;; Use color for the MS-DOS port because it doesn't support underline.
53(defface button '((((type pc) (class color)) 54(defface button '((((type pc) (class color))
54 (:foreground "lightblue")) 55 (:foreground "lightblue"))
55 (t :underline t)) 56 (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."
1880 1880
1881 1881
1882(defface minibuffer-prompt '((((background dark)) :foreground "cyan") 1882(defface minibuffer-prompt '((((background dark)) :foreground "cyan")
1883 ;; Don't use blue because many users of
1884 ;; the MS-DOS port customize their
1885 ;; foreground color to be blue.
1883 (((type pc)) :foreground "magenta") 1886 (((type pc)) :foreground "magenta")
1884 (t :foreground "dark blue")) 1887 (t :foreground "dark blue"))
1885 "Face for minibuffer prompts." 1888 "Face for minibuffer prompts."
@@ -2047,6 +2050,8 @@ Note: Other faces cannot inherit from the cursor face."
2047 :group 'basic-faces) 2050 :group 'basic-faces)
2048 2051
2049(defface escape-glyph '((((background dark)) :foreground "cyan") 2052(defface escape-glyph '((((background dark)) :foreground "cyan")
2053 ;; See the comment in minibuffer-prompt for
2054 ;; the reason not to use blue on MS-DOS.
2050 (((type pc)) :foreground "magenta") 2055 (((type pc)) :foreground "magenta")
2051 (t :foreground "blue")) 2056 (t :foreground "blue"))
2052 "Face for characters displayed as ^-sequences or \-sequences." 2057 "Face for characters displayed as ^-sequences or \-sequences."