From 25f9b4bf397f8c54d47e01eeb711d58ddb70c275 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Tue, 5 May 1998 21:47:53 +0000
Subject: [PATCH] (mouse-major-mode-menu): Run activate-menubar-hook here.

---
 lisp/mouse.el | 2 ++
 1 file changed, 2 insertions(+)

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