Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-14 12:31:25 +00:00
Code Issues Projects Releases Packages Wiki Activity

lisp/help.el (help-function-arglist): Fix last change

Browse source
This commit is contained in:
Stefan Monnier 2026-04-02 15:53:40 -04:00
parent e6d97dfbe1
commit 99f2e353e7
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/help.el
View file

@ -2360,7 +2360,7 @@ the same names as used in the original source code, when possible."
(let ((seen nil))
;; Advice wrappers have "catch all" args, so fetch the actual underlying
;; function to find the real arguments. Also follow aliases.
(while (and (symbolp def) (not (memq def seen)))
(while (not (memq def seen))
(push def seen)
(setq def (advice--cd*r (indirect-function def)))))
;; If definition is a macro, find the function inside it.