# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 776641839 0
# Node ID fcc070bca96d2c7cf22a6b46bad3d8a318466ed2
# Parent  ad46c69956cd4c5517a1f0baf6aa26b23aadde77
(menu-bar-file-menu): Compare Files renamed to Compare.
(menu-bar-ediff-menu): Add one element for compare-windows.

diff -r ad46c69956cd -r fcc070bca96d lisp/menu-bar.el
--- a/lisp/menu-bar.el	Thu Aug 11 21:48:37 1994 +0000
+++ b/lisp/menu-bar.el	Thu Aug 11 21:50:39 1994 +0000
@@ -45,7 +45,7 @@
 (define-key menu-bar-file-menu [epatch]
   '("Apply Patch" . menu-bar-epatch-menu))
 (define-key menu-bar-file-menu [ediff]
-  '("Compare Files" . menu-bar-ediff-menu))
+  '("Compare" . menu-bar-ediff-menu))
 (define-key menu-bar-file-menu [emerge] '("Emerge" . menu-bar-emerge-menu))
 
 (define-key menu-bar-file-menu [separator-misc]
@@ -79,6 +79,10 @@
 (define-key menu-bar-file-menu [save-buffer] '("Save Buffer" . save-buffer))
 (define-key menu-bar-file-menu [dired] '("Open Directory..." . dired))
 (define-key menu-bar-file-menu [open-file] '("Open File..." . find-file))
+
+;; This is just one element of the ediff menu--the first.
+(define-key menu-bar-ediff-menu [window]
+  '("This Window And Next Window" . compare-windows))
 
 (define-key menu-bar-edit-menu [query-replace]
   '("Query Replace" . query-replace))