diff options
| author | Richard M. Stallman | 1995-11-11 07:06:05 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-11-11 07:06:05 +0000 |
| commit | a4e4b9160175e7d030bc6918ab083de38a7650fb (patch) | |
| tree | f97664055c6877ec4b47b2933ee34509a7b6d905 | |
| parent | 14ee19532349ce3cef1f0fd29d136d72df5e05c6 (diff) | |
| download | emacs-a4e4b9160175e7d030bc6918ab083de38a7650fb.tar.gz emacs-a4e4b9160175e7d030bc6918ab083de38a7650fb.zip | |
(delete-frame): Don't use delete-frame as event name.
| -rw-r--r-- | lisp/menu-bar.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 1c122889ba1..de310b93450 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -100,7 +100,9 @@ | |||
| 100 | 100 | ||
| 101 | (if (fboundp 'delete-frame) | 101 | (if (fboundp 'delete-frame) |
| 102 | (progn | 102 | (progn |
| 103 | (define-key menu-bar-files-menu [delete-frame] | 103 | ;; Don't use delete-frame as event name |
| 104 | ;; because that is a special event. | ||
| 105 | (define-key menu-bar-files-menu [delete-this-frame] | ||
| 104 | '("Delete Frame" . delete-frame)) | 106 | '("Delete Frame" . delete-frame)) |
| 105 | (define-key menu-bar-files-menu [make-frame-on-display] | 107 | (define-key menu-bar-files-menu [make-frame-on-display] |
| 106 | '("Open New Display..." . make-frame-on-display)) | 108 | '("Open New Display..." . make-frame-on-display)) |