# HG changeset patch # User Lute Kamstra # Date 1119001307 0 # Node ID 424bf929de28c1c32a9789f1e5c7bde09e9a04d4 # Parent 02c83ab8178d67ae0ce71dbff77ce7b285a1e3b2 (mh-folder-body-face, mh-folder-cur-msg-face) (mh-folder-cur-msg-number-face): New backward-compatibility aliases for renamed faces. diff -r 02c83ab8178d -r 424bf929de28 lisp/mh-e/mh-customize.el --- a/lisp/mh-e/mh-customize.el Fri Jun 17 05:55:26 2005 +0000 +++ b/lisp/mh-e/mh-customize.el Fri Jun 17 09:41:47 2005 +0000 @@ -2156,9 +2156,7 @@ "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 @@ "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 @@ "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.")