]> git.eshelyaron.com Git - emacs.git/commitdiff
(imenu-add-to-menubar): Fix last change.
authorDave Love <fx@gnu.org>
Sun, 8 Oct 2000 09:37:01 +0000 (09:37 +0000)
committerDave Love <fx@gnu.org>
Sun, 8 Oct 2000 09:37:01 +0000 (09:37 +0000)
lisp/imenu.el

index cce78645c2bc8d5935b0cd0c96c2587531975cd2..8f223d3fb1ca1fd9f765583f0a501d4b87bed68f 100644 (file)
@@ -1001,11 +1001,9 @@ See the command `imenu' for more information."
       (let ((newmap (make-sparse-keymap)))
        (set-keymap-parent newmap (current-local-map))
        (setq imenu--last-menubar-index-alist nil)
-       (define-key newmap [menu-bar]
-         (let ((map (make-sparse-keymap)))
-           (define-key map [index] 
-             `(menu-item ,name ,(make-sparse-keymap "Imenu")))
-           map))
+       (define-key newmap [menu-bar index]
+         (define-key map [index] 
+           `(menu-item ,name ,(make-sparse-keymap "Imenu"))))
        (use-local-map newmap)
        (add-hook 'menu-bar-update-hook 'imenu-update-menubar))
     (error "The mode `%s' does not support Imenu" mode-name)))