diff lisp/replace.el @ 105940:f7147d70f6ef

* 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.
author Dan Nicolaescu <dann@ics.uci.edu>
date Wed, 11 Nov 2009 05:57:51 +0000
parents 6b8dce5c4461
children 3f64b8380468
line wrap: on
line diff
--- a/lisp/replace.el	Wed Nov 11 05:49:09 2009 +0000
+++ b/lisp/replace.el	Wed Nov 11 05:57:51 2009 +0000
@@ -789,7 +789,7 @@
     (define-key map [occur-rename-buffer]
       `(menu-item ,(purecopy "Rename occur buffer") occur-rename-buffer
 		  :help ,(purecopy "Rename the current *Occur* buffer to *Occur: original-buffer-name*.")))
-    (define-key map [separator-2] '("--"))
+    (define-key map [separator-2] menu-bar-separator)
     (define-key map [occur-mode-goto-occurrence-other-window]
       `(menu-item ,(purecopy "Go To Occurrence Other Window") occur-mode-goto-occurrence-other-window
 		  :help ,(purecopy "Go to the occurrence the current line describes, in another window")))