Function: define-obsolete-face-alias

define-obsolete-face-alias is a macro defined in byte-run.el.gz.

Signature

(define-obsolete-face-alias OBSOLETE-FACE CURRENT-FACE WHEN)

Documentation

Make OBSOLETE-FACE a face alias for CURRENT-FACE and mark it obsolete.

WHEN should be a string indicating when the face was first made obsolete, for example a date or a release number.

View in manual

Probably introduced at or before Emacs version 23.2.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/byte-run.el.gz
;; FIXME This is only defined in this file because the variable- and
;; function- versions are too.  Unlike those two, this one is not used
;; by the byte-compiler (would be nice if it could warn about obsolete
;; faces, but it doesn't really do anything special with faces).
;; It only really affects M-x describe-face output.
(defmacro define-obsolete-face-alias (obsolete-face current-face when)
  "Make OBSOLETE-FACE a face alias for CURRENT-FACE and mark it obsolete.
WHEN should be a string indicating when the face was first made
obsolete, for example a date or a release number."
  `(progn
     (put ,obsolete-face 'face-alias ,current-face)
     ;; Used by M-x describe-face.
     (put ,obsolete-face 'obsolete-face (or ,when t))))