summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1997-10-15 23:00:25 +0000
committerKarl Heuer <kwzh@gnu.org>1997-10-15 23:00:25 +0000
commit4fdd59c0db6af9192112d86b3ab17b6ebe8d1ff5 (patch)
tree9d16876f51fc89ad5f465802e9da887d94758e67 /lisp
parent91f676a0308cfa468f2090416dd6d9561ed82f40 (diff)
downloademacs-4fdd59c0db6af9192112d86b3ab17b6ebe8d1ff5.tar.gz
(imenu-add-to-menubar): If not using
imenu-default-create-index-function, don't require its variables.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/imenu.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/imenu.el b/lisp/imenu.el
index 6c5affd4233..89757767e5e 100644
--- a/lisp/imenu.el
+++ b/lisp/imenu.el
@@ -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))