diff options
author | Dan Nicolaescu <dann@ics.uci.edu> | 2009-11-11 05:57:51 +0000 |
---|---|---|
committer | Dan Nicolaescu <dann@ics.uci.edu> | 2009-11-11 05:57:51 +0000 |
commit | a3c20c832c18bc0d21e7c94c416582340a614264 (patch) | |
tree | b4f01d637447814da6035bd9afa47061f30ea810 /lisp/buff-menu.el | |
parent | 6bdad9ae02d440a259713ea4a8942d1168e7f452 (diff) | |
download | emacs-a3c20c832c18bc0d21e7c94c416582340a614264.tar.gz |
* subr.el (menu-bar-separator): New defconst.
* replace.el (occur-mode-map):
* menu-bar.el (menu-bar-file-menu, menu-bar-search-menu)
(menu-bar-edit-menu, menu-bar-goto-menu, menu-bar-edit-menu)
(menu-bar-custom-menu, menu-bar-showhide-menu)
(menu-bar-options-menu, menu-bar-tools-menu)
(menu-bar-encryption-decryption-menu, menu-bar-describe-menu)
(menu-bar-search-documentation-menu, menu-bar-manuals-menu)
(menu-bar-help-menu):
* ediff-hook.el (menu-bar-ediff-menu, menu-bar-ediff-merge-menu):
* buff-menu.el (Buffer-menu-mode-map): Use menu-bar-separator.
Diffstat (limited to 'lisp/buff-menu.el')
-rw-r--r-- | lisp/buff-menu.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index 6ef7195c426..c126192e2b5 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -158,12 +158,12 @@ Auto Revert Mode.") (define-key menu-map [rev] `(menu-item ,(purecopy "Refresh") revert-buffer :help ,(purecopy "Refresh the *Buffer List* buffer contents"))) - (define-key menu-map [s0] '("--")) + (define-key menu-map [s0] menu-bar-separator) (define-key menu-map [tf] `(menu-item ,(purecopy "Show only file buffers") Buffer-menu-toggle-files-only :button (:toggle . Buffer-menu-files-only) :help ,(purecopy "Toggle whether the current buffer-menu displays only file buffers"))) - (define-key menu-map [s1] '("--")) + (define-key menu-map [s1] menu-bar-separator) ;; FIXME: The "Select" entries could use better names... (define-key menu-map [sel] `(menu-item ,(purecopy "Select marked") Buffer-menu-select @@ -180,14 +180,14 @@ Auto Revert Mode.") (define-key menu-map [tw] `(menu-item ,(purecopy "Select in current window") Buffer-menu-this-window :help ,(purecopy "Select this line's buffer in this window"))) - (define-key menu-map [s2] '("--")) + (define-key menu-map [s2] menu-bar-separator) (define-key menu-map [is] `(menu-item ,(purecopy "Regexp Isearch marked buffers") Buffer-menu-isearch-buffers-regexp :help ,(purecopy "Search for a regexp through all marked buffers using Isearch"))) (define-key menu-map [ir] `(menu-item ,(purecopy "Isearch marked buffers") Buffer-menu-isearch-buffers :help ,(purecopy "Search for a string through all marked buffers using Isearch"))) - (define-key menu-map [s3] '("--")) + (define-key menu-map [s3] menu-bar-separator) (define-key menu-map [by] `(menu-item ,(purecopy "Bury") Buffer-menu-bury :help ,(purecopy "Bury the buffer listed on this line"))) @@ -197,7 +197,7 @@ Auto Revert Mode.") (define-key menu-map [ex] `(menu-item ,(purecopy "Execute") Buffer-menu-execute :help ,(purecopy "Save and/or delete buffers marked with s or k commands"))) - (define-key menu-map [s4] '("--")) + (define-key menu-map [s4] menu-bar-separator) (define-key menu-map [delb] `(menu-item ,(purecopy "Mark for delete and move backwards") Buffer-menu-delete-backwards :help ,(purecopy "Mark buffer on this line to be deleted by x command and move up one line"))) |