summaryrefslogtreecommitdiff
path: root/lisp/imenu.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-08-06 17:40:22 +0000
committerRichard M. Stallman <rms@gnu.org>1996-08-06 17:40:22 +0000
commit5d43dca8a601af43251fc952db1c23fd076579f4 (patch)
tree64e29ef661bef0e7f5965887790374bf3235431b /lisp/imenu.el
parent98ab445ddbd4619c0bf5b8c978e3317565cccc87 (diff)
downloademacs-5d43dca8a601af43251fc952db1c23fd076579f4.tar.gz
(imenu-update-menubar): Fix code to install the new menu.
Diffstat (limited to 'lisp/imenu.el')
-rw-r--r--lisp/imenu.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/imenu.el b/lisp/imenu.el
index 0ad476ad48f..bc9e8669369 100644
--- a/lisp/imenu.el
+++ b/lisp/imenu.el
@@ -822,8 +822,7 @@ See the command `imenu' for more information."
(cdr (car (cdr menu))))
t))
(setq old (lookup-key (current-local-map) [menu-bar index]))
- (if (keymapp old)
- (setcdr (nthcdr 2 old) menu1)))))))
+ (setcdr old (cdr menu1)))))))
(defun imenu--menubar-select (item)
"Use Imenu to select the function or variable named in this menu item."