procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/help.el (describe-key): Only (copy-sequence elt) when elt is a list.

Browse source
This commit is contained in:
Alan Mackenzie 2017-12-29 09:54:03 +00:00
parent e879a5444a
commit b240c7846b
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

@ -876,7 +876,7 @@ temporarily enables it to allow getting help on disabled items and buttons."
(when (vectorp key) (when (vectorp key)
(let* ((last (1- (length key))) (let* ((last (1- (length key)))
(elt (aref key last)) (elt (aref key last))
(elt-1 (copy-sequence elt)) (elt-1 (if (listp elt) (copy-sequence elt) elt))
key-1 down-event-type) key-1 down-event-type)
(when (and (listp elt-1) (when (and (listp elt-1)
(symbolp (car elt-1)) (symbolp (car elt-1))