* net/eudc.el (eudc-tools-menu):

* international/mule-cmds.el (set-coding-system-map)
(mule-menu-keymap):
* emacs-lisp/lisp-mode.el (emacs-lisp-mode-map):
* vc-hooks.el (vc-menu-map): Use menu-bar-separator.

1 files changed, 6 insertions, 6 deletions

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index dc8d134f16c..4b45bf6b378 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -76,7 +76,7 @@
     (define-key-after map [universal-coding-system-argument]
       `(menu-item ,(purecopy "For Next Command") universal-coding-system-argument
         :help ,(purecopy "Coding system to be used by next command")))
-    (define-key-after map [separator-1] '("--"))
+    (define-key-after map [separator-1] menu-bar-separator)
     (define-key-after map [set-buffer-file-coding-system]
       `(menu-item ,(purecopy "For Saving This Buffer") set-buffer-file-coding-system
         :help ,(purecopy "How to encode this buffer when saved")))
@@ -88,7 +88,7 @@
     (define-key-after map [set-file-name-coding-system]
       `(menu-item ,(purecopy "For File Name") set-file-name-coding-system
         :help ,(purecopy "How to decode/encode file names")))
-    (define-key-after map [separator-2] '("--"))
+    (define-key-after map [separator-2] menu-bar-separator)
 
     (define-key-after map [set-keyboard-coding-system]
       `(menu-item ,(purecopy "For Keyboard") set-keyboard-coding-system
@@ -97,7 +97,7 @@
       `(menu-item ,(purecopy "For Terminal") set-terminal-coding-system
         :enable (null (memq initial-window-system '(x w32 ns)))
         :help ,(purecopy "How to encode terminal output")))
-    (define-key-after map [separator-3] '("--"))
+    (define-key-after map [separator-3] menu-bar-separator)
 
     (define-key-after map [set-selection-coding-system]
       `(menu-item ,(purecopy "For X Selections/Clipboard") set-selection-coding-system
@@ -118,7 +118,7 @@
   (let ((map (make-sparse-keymap "Mule (Multilingual Environment)")))
     (define-key-after map [set-language-environment]
       `(menu-item  ,(purecopy "Set Language Environment") ,setup-language-environment-map))
-    (define-key-after map [separator-mule] '("--"))
+    (define-key-after map [separator-mule] menu-bar-separator)
 
     (define-key-after map [toggle-input-method]
       `(menu-item ,(purecopy "Toggle Input Method") toggle-input-method))
@@ -126,7 +126,7 @@
       `(menu-item ,(purecopy "Select Input Method...") set-input-method))
     (define-key-after map [describe-input-method]
       `(menu-item ,(purecopy "Describe Input Method")  describe-input-method))
-    (define-key-after map [separator-input-method] '("--"))
+    (define-key-after map [separator-input-method] menu-bar-separator)
 
     (define-key-after map [set-various-coding-system]
       `(menu-item ,(purecopy "Set Coding Systems") ,set-coding-system-map
@@ -136,7 +136,7 @@
         :enable (file-readable-p
                  (expand-file-name "HELLO" data-directory))
         :help ,(purecopy "Display file which says HELLO in many languages")))
-    (define-key-after map [separator-coding-system] '("--"))
+    (define-key-after map [separator-coding-system] menu-bar-separator)
 
     (define-key-after map [describe-language-environment]
       `(menu-item ,(purecopy "Describe Language Environment")