Mercurial > emacs

changeset 15831:d110af120b19

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(imenu-update-menubar): Fix code to install the new menu.
author Richard M. Stallman <rms@gnu.org>
date Tue, 06 Aug 1996 17:40:22 +0000
parents 248bde0ddbc6
children 0b6735ce85ac
files lisp/imenu.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/imenu.el	Tue Aug 06 08:21:51 1996 +0000
+++ b/lisp/imenu.el	Tue Aug 06 17:40:22 1996 +0000
@@ -822,8 +822,7 @@
 						     (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."