From: Richard M. Stallman Date: Tue, 27 Jun 1995 10:05:22 +0000 (+0000) Subject: (imenu-choose-buffer-index): Understand that (menu-bar) X-Git-Tag: emacs-19.34~3463 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4cde72b44e467b2911e7f4d588c76f2f41947fe5;p=emacs.git (imenu-choose-buffer-index): Understand that (menu-bar) doesn't specify a window. --- diff --git a/lisp/imenu.el b/lisp/imenu.el index 315e2caf599..3fedade04e7 100644 --- a/lisp/imenu.el +++ b/lisp/imenu.el @@ -964,6 +964,7 @@ The returned value is on the form (INDEX-NAME . INDEX-POSITION)." ;; If selected by mouse, see to that the window where the mouse is ;; really is selected. (and mouse-triggered + (not (equal last-nonmenu-event '(menu-bar))) (let ((window (posn-window (event-start last-nonmenu-event)))) (or (framep window) (select-window window)))) ;; Create a list for this buffer only when needed.