mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

nadvice.el: Rename "where" to "how"

Browse source 
* lisp/emacs-lisp/nadvice.el (advice--how-alist): Rename from
`advice--where-alist`.
(advice--how): Rename from `advice--where` and keep obsolete alias.
(add-function, advice-add): Rename `where` arg to `how`.
* lisp/emacs-lisp/cl-print.el (cl-print-object): Use `advice--how` name.
This commit is contained in:
Stefan Monnier 2022-04-26 16:28:54 -04:00
parent 4dba7c31a2
commit bc9be5449e
2 changed files with 43 additions and 42 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/cl-print.el
View file

@ -230,8 +230,8 @@ into a button whose action shows the function's disassembly.")
(if (not (advice--p object))
(cl-call-next-method)
(princ "#f(advice-wrapper " stream)
(when (fboundp 'advice--where)
(princ (advice--where object) stream)
(when (fboundp 'advice--how)
(princ (advice--how object) stream)
(princ " " stream))
(cl-print-object (advice--cdr object) stream)
(princ " " stream)