# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 971018023 0
# Node ID 700a91f9a4b4c574ec5387d065f13c0cd850529e
# Parent  f00f5d5c966a804461881cd70fcec692dbab3bc2
(imenu-add-to-menubar): Fix again.

diff -r f00f5d5c966a -r 700a91f9a4b4 lisp/imenu.el
--- a/lisp/imenu.el	Sun Oct 08 12:24:23 2000 +0000
+++ b/lisp/imenu.el	Sun Oct 08 15:13:43 2000 +0000
@@ -1002,8 +1002,7 @@
 	(set-keymap-parent newmap (current-local-map))
 	(setq imenu--last-menubar-index-alist nil)
 	(define-key newmap [menu-bar index]
-	  (define-key map [index] 
-	    `(menu-item ,name ,(make-sparse-keymap "Imenu"))))
+	  `(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)))