* lisp/imenu.el (imenu--create-keymap): Use proper closures
This commit is contained in:
parent
2520a163cb
commit
0ccd712ad2
1 changed files with 2 additions and 2 deletions
|
@ -463,8 +463,8 @@ Non-nil arguments are in recursive calls."
|
|||
((imenu--subalist-p item)
|
||||
(imenu--create-keymap (car item) (cdr item) cmd))
|
||||
(t
|
||||
`(lambda () (interactive)
|
||||
,(if cmd `(,cmd ',item) (list 'quote item)))))))
|
||||
(lambda () (interactive)
|
||||
(if cmd (funcall cmd item) item))))))
|
||||
alist)))
|
||||
|
||||
(defun imenu--in-alist (str alist)
|
||||
|
|
Loading…
Add table
Reference in a new issue