mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00
Code Issues Projects Releases Wiki Activity

(mouse-major-mode-menu): Run activate-menubar-hook here.

Browse source
This commit is contained in:
Richard M. Stallman 1998-05-05 21:47:53 +00:00
parent 437d9247a0
commit 25f9b4bf39
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mouse.el
View file

@ -49,6 +49,8 @@
;; Switch to the window clicked on, because otherwise ;; Switch to the window clicked on, because otherwise
;; the mode's commands may not make sense. ;; the mode's commands may not make sense.
(interactive "@e\nP") (interactive "@e\nP")
;; Let the mode update its menus first.
(run-hooks 'activate-menubar-hook)
(let (;; This is where mouse-major-mode-menu-prefix (let (;; This is where mouse-major-mode-menu-prefix
;; returns the prefix we should use (after menu-bar). ;; returns the prefix we should use (after menu-bar).
;; It is either nil or (SOME-SYMBOL). ;; It is either nil or (SOME-SYMBOL).