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

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

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))