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

2005-09-14 Chong Yidong <cyd@stupidchicken.com>

Browse source 
* mouse.el (mouse-major-mode-menu): Make `prefix' optional.
	Delete unused local var.
This commit is contained in:
Chong Yidong 2005-09-13 20:13:31 +00:00
parent 1b53925a36
commit 40cfe0d8bc
2 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2005-09-14 Chong Yidong <cyd@stupidchicken.com>
* mouse.el (mouse-major-mode-menu): Make `prefix' optional.
Delete unused local var.
2005-09-13 Juanma Barranquero <lekktu@gmail.com>
* help-fns.el (describe-categories): "?\ " -> "?\s".

5
lisp/mouse.el
View file

@ -153,7 +153,7 @@ PREFIX is the prefix argument (if any) to pass to the command."
(defvar mouse-major-mode-menu-prefix) ; dynamically bound
(defun mouse-major-mode-menu (event prefix)
(defun mouse-major-mode-menu (event &optional prefix)
"Pop up a mode-specific menu of mouse commands.
Default to the Edit menu if the major mode doesn't define a menu."
;; Switch to the window clicked on, because otherwise
@ -173,8 +173,7 @@ Default to the Edit menu if the major mode doesn't define a menu."
;; default to the edit menu.
(newmap (if ancestor
(make-sparse-keymap (concat mode-name " Mode"))
menu-bar-edit-menu))
result)
menu-bar-edit-menu)))
(if ancestor
;; Make our menu inherit from the desired keymap which we want
;; to display as the menu now.