From 2ef2d89752a6aa9e5be8079ed5e40a2d46d5c9d9 Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Sat, 17 Jun 1995 06:33:08 +0000 Subject: [PATCH] Fixed bogus references to menu-bar-file-menu in define-key forms. --- lisp/ediff.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/ediff.el b/lisp/ediff.el index 73cc1b9a07f..08fdfc6e3b4 100644 --- a/lisp/ediff.el +++ b/lisp/ediff.el @@ -1768,7 +1768,7 @@ With prefix argument, prompts for a revision name." () (define-key menu-bar-ediff-menu [ediff-revision] '("File with Revision ..." . ediff-revision)) - (define-key menu-bar-file-menu [separator-ediff-files] '("--")) + (define-key menu-bar-ediff-menu [separator-ediff-files] '("--")) (define-key menu-bar-ediff-menu [ediff-buffers3] '("Three Buffers ..." . ediff-buffers3)) (define-key menu-bar-ediff-menu [ediff-files3] @@ -1784,12 +1784,12 @@ With prefix argument, prompts for a revision name." ;; explicit string-match, as ediff-xemacs-p is not defined at build time (if (string-match "\\(Lucid\\|Xemacs\\)" emacs-version) () - (define-key menu-bar-file-menu [separator-ediff-regions] '("--")) + (define-key menu-bar-ediff-menu [separator-ediff-regions] '("--")) (define-key menu-bar-ediff-menu [ediff-regions-linewise] '("Regions Line-by-line ..." . ediff-regions-linewise)) (define-key menu-bar-ediff-menu [ediff-regions-wordwise] '("Regions Word-by-word ..." . ediff-regions-wordwise)) - (define-key menu-bar-file-menu [separator-ediff-windows] '("--")) + (define-key menu-bar-ediff-menu [separator-ediff-windows] '("--")) (define-key menu-bar-ediff-menu [ediff-windows-linewise] '("Windows Line-by-line ..." . ediff-windows-linewise)) (define-key menu-bar-ediff-menu [ediff-windows-wordwise] @@ -1806,7 +1806,7 @@ With prefix argument, prompts for a revision name." '("Revisions with Ancestor ..." . ediff-merge-revisions-with-ancestor)) (define-key menu-bar-ediff-merge-menu [ediff-merge-revisions] '("Revisions ..." . ediff-merge-revisions)) - (define-key menu-bar-file-menu [separator-ediff-merge] '("--")) + (define-key menu-bar-ediff-merge-menu [separator-ediff-merge] '("--")) (define-key menu-bar-ediff-merge-menu [ediff-merge-buffers-with-ancestor] '("Buffers with Ancestor ..." . ediff-merge-buffers-with-ancestor)) (define-key menu-bar-ediff-merge-menu [ediff-merge-buffers] -- 2.39.2