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

(imenu-add-to-menubar): If not using

Browse source 
imenu-default-create-index-function, don't require its variables.
This commit is contained in:
Karl Heuer 1997-10-15 23:00:25 +00:00
parent 91f676a030
commit 4fdd59c0db
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/imenu.el
View file

@ -902,7 +902,9 @@ The returned value is of the form (INDEX-NAME . INDEX-POSITION)."
NAME is a string used to name the menu bar item.
See the command `imenu' for more information."
(interactive "sImenu menu item name: ")
(if (or (and (fboundp imenu-prev-index-position-function)
(if (or (not (eq imenu-create-index-function
'imenu-default-create-index-function))
(and (fboundp imenu-prev-index-position-function)
(fboundp imenu-extract-index-name-function))
(and imenu-generic-expression))
(let ((newmap (make-sparse-keymap))