From: Karl Heuer Date: Wed, 15 Oct 1997 23:00:25 +0000 (+0000) Subject: (imenu-add-to-menubar): If not using X-Git-Tag: emacs-20.3~3022 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4fdd59c0db6af9192112d86b3ab17b6ebe8d1ff5;p=emacs.git (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 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))