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

imenu-default-create-index-function, don't require its variables.

diff --git a/lisp/imenu.el b/lisp/imenu.el
index 6c5affd42335deb52d052b1953d7d12a2fb5b166..89757767e5ebf41a9820b19ce8ce4ee0e210fc06 100644 (file)
--- 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))