Mercurial > emacs

diff lisp/menu-bar.el @ 13506:6360f5543071

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(delete-frame): Don't use delete-frame as event name.
author Richard M. Stallman <rms@gnu.org>
date Sat, 11 Nov 1995 07:06:05 +0000
parents ddf1e34018d2
children 051b4ffca31f
line wrap: on
line diff
--- a/lisp/menu-bar.el	Sat Nov 11 05:33:37 1995 +0000
+++ b/lisp/menu-bar.el	Sat Nov 11 07:06:05 1995 +0000
@@ -100,7 +100,9 @@
 
 (if (fboundp 'delete-frame)
     (progn
-      (define-key menu-bar-files-menu [delete-frame]
+      ;; Don't use delete-frame as event name
+      ;; because that is a special event.
+      (define-key menu-bar-files-menu [delete-this-frame]
 	'("Delete Frame" . delete-frame))
       (define-key menu-bar-files-menu [make-frame-on-display]
 	'("Open New Display..." . make-frame-on-display))