From 40a8cde1374fb8dc5af2312f258a591a18f4bdaf Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 11 Aug 1994 21:50:39 +0000 Subject: [PATCH] (menu-bar-file-menu): Compare Files renamed to Compare. (menu-bar-ediff-menu): Add one element for compare-windows. --- lisp/menu-bar.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index c2536e2432f..a868ac4c69c 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -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)) -- 2.39.5