mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-28 07:45:00 +00:00
Move the diff command to "Operate" in ibuffer
* lisp/ibuffer.el (ibuffer-mode-operate-map): Move the diff command to the "Operate" menu, and remove the customisation entry to make the "View" menu more logical (bug#1150).
This commit is contained in:
parent
b3500fc058
commit
162f185392
@ -700,16 +700,10 @@ directory, like `default-directory'."
|
||||
|
||||
(define-key-after map [menu-bar view dashes2]
|
||||
'("--"))
|
||||
(define-key-after map [menu-bar view diff-with-file]
|
||||
'(menu-item "Diff with file" ibuffer-diff-with-file
|
||||
:help "View the differences between this buffer and its file"))
|
||||
(define-key-after map [menu-bar view auto-mode]
|
||||
'(menu-item "Auto Mode" ibuffer-auto-mode
|
||||
:button (:toggle . ibuffer-auto-mode)
|
||||
:help "Attempt to automatically update the Ibuffer buffer"))
|
||||
(define-key-after map [menu-bar view customize]
|
||||
'(menu-item "Customize Ibuffer" ibuffer-customize
|
||||
:help "Use Custom to customize Ibuffer"))
|
||||
|
||||
(define-key-after map [menu-bar mark]
|
||||
(cons "Mark" (make-sparse-keymap "Mark")))
|
||||
@ -820,6 +814,9 @@ directory, like `default-directory'."
|
||||
(define-key-after operate-map [do-view-and-eval]
|
||||
'(menu-item "Eval (viewing buffer)..." ibuffer-do-view-and-eval
|
||||
:help "Evaluate a Lisp form in each marked buffer while viewing it"))
|
||||
(define-key-after operate-map [diff-with-file]
|
||||
'(menu-item "Diff with file" ibuffer-diff-with-file
|
||||
:help "View the differences between this buffer and its file"))
|
||||
|
||||
operate-map))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user