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

* lisp/help.el (help-function-arglist): Don't substitute-command-keys

Browse source
This commit is contained in:
Stefan Monnier 2024-03-26 17:41:42 -04:00
parent e5d824b632
commit 48b6e6bd80
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/help.el
View file

@ -2353,7 +2353,7 @@ the same names as used in the original source code, when possible."
((or (and (byte-code-function-p def) (integerp (aref def 0))) ((or (and (byte-code-function-p def) (integerp (aref def 0)))
(subrp def) (module-function-p def)) (subrp def) (module-function-p def))
(or (when preserve-names (or (when preserve-names
(let* ((doc (condition-case nil (documentation def) (error nil))) (let* ((doc (condition-case nil (documentation def 'raw) (error nil)))
(docargs (if doc (car (help-split-fundoc doc nil)))) (docargs (if doc (car (help-split-fundoc doc nil))))
(arglist (if docargs (arglist (if docargs
(cdar (read-from-string (downcase docargs))))) (cdar (read-from-string (downcase docargs)))))