mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-28 07:45:00 +00:00
Further define-obsolete-* doc fixups
* lisp/emacs-lisp/byte-run.el (define-obsolete-face-alias): Fix up last change. (define-obsolete-variable-alias): Ditto.
This commit is contained in:
parent
247c388f16
commit
28e9f4390d
@ -407,7 +407,7 @@ dumped with Emacs). This is so that any user customizations are
|
||||
applied before the defcustom tries to initialize the
|
||||
variable (this is due to the way `defvaralias' works).
|
||||
|
||||
If provided, WHEN should be a string indicating when the function
|
||||
If provided, WHEN should be a string indicating when the variable
|
||||
was first made obsolete, for example a date or a release number.
|
||||
|
||||
For the benefit of `custom-set-variables', if OBSOLETE-NAME has
|
||||
@ -434,7 +434,7 @@ CURRENT-NAME, if it does not already have them:
|
||||
;; 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.
|
||||
If provided, WHEN should be a string indicating when the function
|
||||
If provided, 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)
|
||||
|
Loading…
Reference in New Issue
Block a user