(popup-menu): Convert list to same-size vector, not singleton vector.
This commit is contained in:
parent
fbf8f564cf
commit
c6dd34cba2
1 changed files with 1 additions and 1 deletions
|
@ -139,7 +139,7 @@ The syntax, more precisely:
|
|||
(setq answer (x-popup-menu (list (list (nth 1 pos) (nthcdr 2 pos))
|
||||
(car pos))
|
||||
menu))
|
||||
(setq cmd (lookup-key menu (vector answer)))
|
||||
(setq cmd (lookup-key menu (apply 'vector answer)))
|
||||
(setq menu nil)
|
||||
(and cmd
|
||||
(if (keymapp cmd)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue