aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/menu-bar.el14
1 files changed, 9 insertions, 5 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 1a8cbfea12e..45a880a8468 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -57,11 +57,15 @@
57(define-key menu-bar-file-menu [rmail] '("Read Mail" . rmail)) 57(define-key menu-bar-file-menu [rmail] '("Read Mail" . rmail))
58(define-key menu-bar-file-menu [gnus] '("Read Net News" . gnus)) 58(define-key menu-bar-file-menu [gnus] '("Read Net News" . gnus))
59 59
60(define-key menu-bar-file-menu [separator-frames] 60(if (fboundp 'delete-frame)
61 '("--")) 61 (progn
62 62 (define-key menu-bar-file-menu [separator-frames]
63(define-key menu-bar-file-menu [delete-frame] '("Delete Frame" . delete-frame)) 63 '("--"))
64(define-key menu-bar-file-menu [make-frame] '("Make New Frame" . make-frame)) 64
65 (define-key menu-bar-file-menu [delete-frame]
66 '("Delete Frame" . delete-frame))
67 (define-key menu-bar-file-menu [make-frame]
68 '("Make New Frame" . make-frame))))
65 69
66(define-key menu-bar-file-menu [separator-buffers] 70(define-key menu-bar-file-menu [separator-buffers]
67 '("--")) 71 '("--"))