# HG changeset patch # User Richard M. Stallman # Date 918337853 0 # Node ID 02ae21f066ecfb3e8c88d01eb93833c50e7524e0 # Parent a29550b1d150eb4de1d4e74e88b5d6de72ab1051 (imenu--last-menubar-index-alist): Add doc. (imenu-add-to-menubar): Reset imenu--last-menubar-index-alist. diff -r a29550b1d150 -r 02ae21f066ec lisp/imenu.el --- a/lisp/imenu.el Sat Feb 06 05:50:59 1999 +0000 +++ b/lisp/imenu.el Sat Feb 06 21:50:53 1999 +0000 @@ -426,8 +426,9 @@ (make-variable-buffer-local 'imenu--index-alist) -;; The latest buffer index used to update the menu bar menu. -(defvar imenu--last-menubar-index-alist nil) +(defvar imenu--last-menubar-index-alist nil + "The latest buffer index used to update the menu bar menu.") + (make-variable-buffer-local 'imenu--last-menubar-index-alist) ;; History list for 'jump-to-function-in-buffer'. @@ -991,6 +992,7 @@ 'imenu-default-create-index-function))) (let ((newmap (make-sparse-keymap)) (menu-bar (lookup-key (current-local-map) [menu-bar]))) + (setq imenu--last-menubar-index-alist nil) (define-key newmap [menu-bar] (append (make-sparse-keymap) menu-bar)) (define-key newmap [menu-bar index]