From: Dave Love Date: Mon, 4 Sep 2000 21:23:51 +0000 (+0000) Subject: (mouse-major-mode-menu, mouse-popup-menubar): Run X-Git-Tag: emacs-pretest-21.0.90~1792 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=179fc9ef03060813603a33b7c26dd3d906d17d47;p=emacs.git (mouse-major-mode-menu, mouse-popup-menubar): Run menu-bar-update-hook. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b8120b54b88..73e3eb649bb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1528,6 +1528,12 @@ 2000-09-04 Dave Love + * mouse.el (mouse-major-mode-menu, mouse-popup-menubar): Run + menu-bar-update-hook. + + * help.el (help-manyarg-func-alist): Add + find-operation-coding-system. + * wid-edit.el (widget-sexp-validate): Fix garbled code. * custom.el (custom-set-variables): Print message about errors in diff --git a/lisp/mouse.el b/lisp/mouse.el index 502f8e02c60..373d1014a05 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -105,7 +105,7 @@ Default to the Edit menu if the major mode doesn't define a menu." ;; the mode's commands may not make sense. (interactive "@e\nP") ;; Let the mode update its menus first. - (run-hooks 'activate-menubar-hook) + (run-hooks 'activate-menubar-hook 'menu-bar-update-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). @@ -166,7 +166,7 @@ Default to the Edit menu if the major mode doesn't define a menu." The contents are the items that would be in the menu bar whether or not it is actually displayed." (interactive "@e \nP") - (run-hooks 'activate-menubar-hook) + (run-hooks 'activate-menubar-hook 'menu-bar-update-hook) (let* ((local-menu (and (current-local-map) (lookup-key (current-local-map) [menu-bar]))) (global-menu (lookup-key global-map [menu-bar]))