comparison lisp/menu-bar.el @ 7420:6207bb464d7b

(menu-bar-file-menu): Add Apply Patch and Compare Files
author Richard M. Stallman <rms@gnu.org>
date Mon, 09 May 1994 20:46:58 +0000
parents 969e565dffff
children 9fccb6828abd
comparison
equal deleted inserted replaced
7419:0d0a01a0310c 7420:6207bb464d7b
39 (define-key menu-bar-file-menu [exit-emacs] 39 (define-key menu-bar-file-menu [exit-emacs]
40 '("Exit Emacs" . save-buffers-kill-emacs)) 40 '("Exit Emacs" . save-buffers-kill-emacs))
41 (define-key menu-bar-file-menu [kill-buffer] 41 (define-key menu-bar-file-menu [kill-buffer]
42 '("Kill Buffer" . kill-this-buffer)) 42 '("Kill Buffer" . kill-this-buffer))
43 (define-key menu-bar-file-menu [delete-frame] '("Delete Frame" . delete-frame)) 43 (define-key menu-bar-file-menu [delete-frame] '("Delete Frame" . delete-frame))
44 (define-key menu-bar-file-menu [epatch]
45 '("Apply Patch" . menu-bar-epatch-menu))
46 (define-key menu-bar-file-menu [ediff]
47 '("Compare Files" . menu-bar-ediff-menu))
44 (define-key menu-bar-file-menu [emerge] '("Emerge" . menu-bar-emerge-menu)) 48 (define-key menu-bar-file-menu [emerge] '("Emerge" . menu-bar-emerge-menu))
45 (define-key menu-bar-file-menu [calendar] '("Calendar" . calendar)) 49 (define-key menu-bar-file-menu [calendar] '("Calendar" . calendar))
46 (define-key menu-bar-file-menu [rmail] '("Read Mail" . rmail)) 50 (define-key menu-bar-file-menu [rmail] '("Read Mail" . rmail))
47 (define-key menu-bar-file-menu [gnus] '("Read Net News" . gnus)) 51 (define-key menu-bar-file-menu [gnus] '("Read Net News" . gnus))
48 (define-key menu-bar-file-menu [bookmark] 52 (define-key menu-bar-file-menu [bookmark]