mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-20 13:00:51 -07:00
Code Issues Projects Releases Wiki Activity

(imenu--menubar-select): Set imenu-menubar-modified-tick

Browse source 
and imenu--last-menubar-index-alist.
This commit is contained in:
Richard M. Stallman 2004-05-29 14:35:20 +00:00
parent 1c795a0e15
commit bcaa1cef05
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/imenu.el
View file

@ -890,6 +890,7 @@ Returns t for rescan and otherwise a position number."
(setq name (completing-read prompt
prepared-index-alist
nil t nil 'imenu--history-list name)))
(cond ((not (stringp name)) nil)
((string= name (car imenu--rescan-item)) t)
(t
@ -1015,7 +1016,10 @@ This value becomes local in every buffer when it is set.")
(if (equal item imenu--rescan-item)
(progn
(imenu--cleanup)
;; Make sure imenu-update-menubar redoes everything.
(setq imenu-menubar-modified-tick -1)
(setq imenu--index-alist nil)
(setq imenu--last-menubar-index-alist nil)
(imenu-update-menubar)
t)
(imenu item)