diff options
| author | Lute Kamstra <lute@gnu.org> | 2005-06-17 09:42:29 +0000 |
|---|---|---|
| committer | Lute Kamstra <lute@gnu.org> | 2005-06-17 09:42:29 +0000 |
| commit | 06266fbb1e1269487bbdcfbac9ce25b4c944b4ac (patch) | |
| tree | 8c91ab781f7a919a516b31830c4c41988d561c32 /lisp/mh-e/mh-customize.el | |
| parent | fa735daaabda51ee133fee08f0a72973e39f3a13 (diff) | |
| download | emacs-06266fbb1e1269487bbdcfbac9ce25b4c944b4ac.tar.gz | |
(mh-folder-body-face, mh-folder-cur-msg-face)
(mh-folder-cur-msg-number-face): New backward-compatibility aliases
for renamed faces.
Diffstat (limited to 'lisp/mh-e/mh-customize.el')
| -rw-r--r-- | lisp/mh-e/mh-customize.el | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/lisp/mh-e/mh-customize.el b/lisp/mh-e/mh-customize.el index 7aad0798ae0..5c13e8d93e6 100644 --- a/lisp/mh-e/mh-customize.el +++ b/lisp/mh-e/mh-customize.el @@ -2156,9 +2156,7 @@ will be removed from the unseen sequence." "Face used to highlight body text in MH-Folder buffers." :group 'mh-folder-faces) ;; backward-compatibility alias -(put 'mh-folder-body 'face-alias 'mh-folder-body) -;; backward-compatibility alias -(put ''mh-folder-body-face 'face-alias ''mh-folder-body) +(put 'mh-folder-body-face 'face-alias 'mh-folder-body) (defvar mh-folder-cur-msg-face 'mh-folder-cur-msg "Face used for the current message line in MH-Folder buffers.") @@ -2175,9 +2173,7 @@ will be removed from the unseen sequence." "Face used for the current message line in MH-Folder buffers." :group 'mh-folder-faces) ;; backward-compatibility alias -(put 'mh-folder-cur-msg 'face-alias 'mh-folder-cur-msg) -;; backward-compatibility alias -(put ''mh-folder-cur-msg-face 'face-alias ''mh-folder-cur-msg) +(put 'mh-folder-cur-msg-face 'face-alias 'mh-folder-cur-msg) (defvar mh-folder-cur-msg-number-face 'mh-folder-cur-msg-number "Face used to highlight the current message in MH-Folder buffers.") @@ -2191,9 +2187,7 @@ will be removed from the unseen sequence." "Face used to highlight the current message in MH-Folder buffers." :group 'mh-folder-faces) ;; backward-compatibility alias -(put 'mh-folder-cur-msg-number 'face-alias 'mh-folder-cur-msg-number) -;; backward-compatibility alias -(put ''mh-folder-cur-msg-number-face 'face-alias ''mh-folder-cur-msg-number) +(put 'mh-folder-cur-msg-number-face 'face-alias 'mh-folder-cur-msg-number) (defvar mh-folder-date-face 'mh-folder-date "Face used to highlight the date in MH-Folder buffers.") |