mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

lisp/help.el (help-function-arglist): Fix out-of-bounds access (bug#76179)

Browse source
This commit is contained in:
Stefan Monnier 2025-02-10 15:35:20 -05:00
parent 317a5015f8
commit 411db55432
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

@ -2381,7 +2381,7 @@ the same names as used in the original source code, when possible."
(dolist (arg arglist)
(unless (and (symbolp arg)
(let ((name (symbol-name arg)))
(if (eq (aref name 0) ?&)
(if (and (> (length name) 0) (eq (aref name 0) ?&))
(memq arg '(&rest &optional))
(not (string-search "." name)))))
(setq valid nil)))