diff options
| author | Eli Zaretskii | 2008-09-05 15:08:34 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2008-09-05 15:08:34 +0000 |
| commit | 19758b9562a0cb7325aeae1d99b347a4fbb18e46 (patch) | |
| tree | b484f5d59e0fa7f0d626e77fec6983cb8350bbde | |
| parent | dda86321947016c0614a2a7f0293d8abf5d38805 (diff) | |
| download | emacs-19758b9562a0cb7325aeae1d99b347a4fbb18e46.tar.gz emacs-19758b9562a0cb7325aeae1d99b347a4fbb18e46.zip | |
(custom-button-pressed): Default to inverse-video.
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/cus-edit.el | 5 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 82cab3b8dc1..8925dd43b91 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,7 @@ | |||
| 1 | 2008-09-05 Eli Zaretskii <eliz@gnu.org> | 1 | 2008-09-05 Eli Zaretskii <eliz@gnu.org> |
| 2 | 2 | ||
| 3 | * cus-edit.el (custom-button-pressed): Default to inverse-video. | ||
| 4 | |||
| 3 | * term/pc-win.el (msdos-face-setup): Setup faces for all frames, | 5 | * term/pc-win.el (msdos-face-setup): Setup faces for all frames, |
| 4 | not just for terminal-frame. | 6 | not just for terminal-frame. |
| 5 | 7 | ||
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 29152e12ce8..0c810879a88 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el | |||
| @@ -2073,7 +2073,7 @@ and `face'." | |||
| 2073 | (:box (:line-width 2 :style released-button) | 2073 | (:box (:line-width 2 :style released-button) |
| 2074 | :background "grey90" :foreground "black")) | 2074 | :background "grey90" :foreground "black")) |
| 2075 | (t | 2075 | (t |
| 2076 | nil)) | 2076 | (:inverse-video t))) |
| 2077 | "Mouse face for custom buffer buttons if `custom-raised-buttons' is non-nil." | 2077 | "Mouse face for custom buffer buttons if `custom-raised-buttons' is non-nil." |
| 2078 | :version "22.1" | 2078 | :version "22.1" |
| 2079 | :group 'custom-faces) | 2079 | :group 'custom-faces) |
| @@ -2095,6 +2095,9 @@ and `face'." | |||
| 2095 | (:box (:line-width 2 :style pressed-button) | 2095 | (:box (:line-width 2 :style pressed-button) |
| 2096 | :background "lightgrey" :foreground "black")) | 2096 | :background "lightgrey" :foreground "black")) |
| 2097 | (t | 2097 | (t |
| 2098 | ;; This is for text terminals that support mouse, like GPM mouse | ||
| 2099 | ;; or the MS-DOS terminal: inverse-video makes the button stand | ||
| 2100 | ;; out on mouse-over. | ||
| 2098 | (:inverse-video t))) | 2101 | (:inverse-video t))) |
| 2099 | "Face for pressed custom buttons if `custom-raised-buttons' is non-nil." | 2102 | "Face for pressed custom buttons if `custom-raised-buttons' is non-nil." |
| 2100 | :version "21.1" | 2103 | :version "21.1" |