mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(display-time-mail-face): Replace :group faces' with mode-line-faces'.

Browse source
This commit is contained in:
Juri Linkov 2006-01-16 23:55:25 +00:00
parent 8eafa1659b
commit 83033a3a5b
2 changed files with 27 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

26
lisp/ChangeLog
View file

@ -1,3 +1,29 @@
2006-01-17 Juri Linkov <juri@jurta.org>
* faces.el (mode-line-faces): New defgroup.
(mode-line-highlight): Move definition after new defgroup.
(mode-line, mode-line-inactive, mode-line-highlight):
Replace :group `modeline' with `mode-line-faces'.
(mode-line-buffer-id): New face.
(modeline-buffer-id): New face alias.
(vertical-border): Remove :group `modeline'.
* bindings.el (propertized-buffer-identification): Use face
`mode-line-buffer-id' instead of `Buffer-menu-buffer'.
(mode-line-next-buffer, mode-line-previous-buffer): New functions.
(mode-line-buffer-identification-keymap): For mouse-1 replace
`mode-line-unbury-buffer' with `mode-line-previous-buffer'.
Replace `mode-line-bury-buffer' with `mode-line-next-buffer' for
mouse-3.
* info.el (Info-mode-line-node-keymap): New defvar.
(Info-set-mode-line): Use `stringp' to check Info-current-file.
Propertize Info-current-node with `mode-line-buffer-id' and
`mode-line-highlight' faces and `Info-mode-line-node-keymap'.
* time.el (display-time-mail-face): Replace :group `faces' with
`mode-line-faces'.
2006-01-16 Kenichi Handa <handa@m17n.org>
* international/code-pages.el: Add autoload cookies for

2
lisp/time.el
View file

@ -129,7 +129,7 @@ This runs the normal hook `display-time-hook' after each update."
If `display-time-use-mail-icon' is non-nil, the image's
background color is the background of this face. Set this to
make the mail indicator stand out on a color display."
:group 'faces
:group 'mode-line-faces
:group 'display-time
:version "22.1"
:type '(choice (const :tag "None" nil) face))