(menu-bar-epatch-menu, menu-bar-ediff-merge-menu)

(menu-bar-ediff-menu): Give names to the menus.

(menu-bar-epatch-menu, menu-bar-ediff-merge-menu)
(menu-bar-ediff-menu): Give names to the menus.
8a10f781 · Richard M. Stallman · eb4daa01 · 8a10f781
Commit 8a10f781 authored Nov 20, 1995 by Richard M. Stallman
Show whitespace changes
Inline Side-by-side

Showing with 3 additions and 3 deletions

lisp/ediff-hook.el lisp/ediff-hook.el +3 -3

No files found.
--- a/lisp/ediff-hook.el
+++ b/lisp/ediff-hook.el
@@ -104,12 +104,12 @@
      ;; Emacs--only if menu-bar is loaded
      ((featurep 'menu-bar)
       ;; initialize menu bar keymaps
-       (defvar menu-bar-epatch-menu (make-sparse-keymap))
+       (defvar menu-bar-epatch-menu (make-sparse-keymap "Apply Patch"))
       (fset 'menu-bar-epatch-menu (symbol-value 'menu-bar-epatch-menu))
-       (defvar menu-bar-ediff-merge-menu (make-sparse-keymap))
+       (defvar menu-bar-ediff-merge-menu (make-sparse-keymap "Merge"))
       (fset 'menu-bar-ediff-merge-menu 
 	     (symbol-value 'menu-bar-ediff-merge-menu))
-       (defvar menu-bar-ediff-menu (make-sparse-keymap))
+       (defvar menu-bar-ediff-menu (make-sparse-keymap "Compare"))
       (fset 'menu-bar-ediff-menu (symbol-value 'menu-bar-ediff-menu))

       ;; define ediff-menu