[Emacs-diffs] Changes to emacs/lisp/mouse.el

[Chong Yidong]

Index: emacs/lisp/mouse.el
diff -c emacs/lisp/mouse.el:1.276 emacs/lisp/mouse.el:1.277
*** emacs/lisp/mouse.el:1.276   Tue Sep  6 19:10:06 2005
--- emacs/lisp/mouse.el Tue Sep 13 20:13:31 2005
***************
*** 153,159 ****
  
  (defvar mouse-major-mode-menu-prefix) ; dynamically bound
  
! (defun mouse-major-mode-menu (event 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
--- 153,159 ----
  
  (defvar mouse-major-mode-menu-prefix) ; dynamically bound
  
! (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,180 ****
         ;; default to the edit menu.
         (newmap (if ancestor
                     (make-sparse-keymap (concat mode-name " Mode"))
!                  menu-bar-edit-menu))
!        result)
      (if ancestor
        ;; Make our menu inherit from the desired keymap which we want
        ;; to display as the menu now.
--- 173,179 ----
         ;; default to the edit menu.
         (newmap (if ancestor
                     (make-sparse-keymap (concat mode-name " Mode"))
!                  menu-bar-edit-menu)))
      (if ancestor
        ;; Make our menu inherit from the desired keymap which we want
        ;; to display as the menu now.