diff options
| author | Richard M. Stallman | 2005-06-23 21:24:58 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-06-23 21:24:58 +0000 |
| commit | 0a66defc195e4b8ad36cbe676d1d603f714c87b6 (patch) | |
| tree | 6fc519be896333c3c047ab5ed5729ca04eae4b9c | |
| parent | de97d5e8eb944f21a48fee986770b16919dfa352 (diff) | |
| download | emacs-0a66defc195e4b8ad36cbe676d1d603f714c87b6.tar.gz emacs-0a66defc195e4b8ad36cbe676d1d603f714c87b6.zip | |
(escape-glyph): Use brown against light background.
(nobreak-space): Renamed from no-break-space.
Fix previous change.
| -rw-r--r-- | lisp/faces.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 0b4125dff52..82740afa80d 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -2119,17 +2119,18 @@ Note: Other faces cannot inherit from the cursor face." | |||
| 2119 | ;; See the comment in minibuffer-prompt for | 2119 | ;; See the comment in minibuffer-prompt for |
| 2120 | ;; the reason not to use blue on MS-DOS. | 2120 | ;; the reason not to use blue on MS-DOS. |
| 2121 | (((type pc)) :foreground "magenta") | 2121 | (((type pc)) :foreground "magenta") |
| 2122 | ;; red4 is too light -- rms. | 2122 | ;; red4 is too dark, but some say blue is too loud. |
| 2123 | (t :foreground "blue")) | 2123 | ;; brown seems to work ok. -- rms. |
| 2124 | (t :foreground "brown")) | ||
| 2124 | "Face for characters displayed as ^-sequences or \-sequences." | 2125 | "Face for characters displayed as ^-sequences or \-sequences." |
| 2125 | :group 'basic-faces | 2126 | :group 'basic-faces |
| 2126 | :version "22.1") | 2127 | :version "22.1") |
| 2127 | 2128 | ||
| 2128 | (defface no-break-space | 2129 | (defface nobreak-space |
| 2129 | '((((class color) (min-colors 88)) :inherit escape-glyph :underline t) | 2130 | '((((class color) (min-colors 88)) :inherit escape-glyph :underline t) |
| 2130 | (((class color) (min-colors 8)) :background "magenta" :foreground ) | 2131 | (((class color) (min-colors 8)) :background "magenta") |
| 2131 | (t :inverse-video t)) | 2132 | (t :inverse-video t)) |
| 2132 | "Face for non-breaking space." | 2133 | "Face for displaying nobreak space." |
| 2133 | :group 'basic-faces | 2134 | :group 'basic-faces |
| 2134 | :version "22.1") | 2135 | :version "22.1") |
| 2135 | 2136 | ||