diff options
| -rw-r--r-- | lisp/menu-bar.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index fd77066f0b0..429da3c766c 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -1017,7 +1017,7 @@ key (or menu-item)")) | |||
| 1017 | "List All Buffers")) | 1017 | "List All Buffers")) |
| 1018 | ;; Now make the actual list of items, | 1018 | ;; Now make the actual list of items, |
| 1019 | ;; ending with the list-buffers item. | 1019 | ;; ending with the list-buffers item. |
| 1020 | (nconc (mapcar '(lambda (pair) | 1020 | (nconc (mapcar (lambda (pair) |
| 1021 | ;; This is somewhat risque, to use | 1021 | ;; This is somewhat risque, to use |
| 1022 | ;; the buffer name itself as the event | 1022 | ;; the buffer name itself as the event |
| 1023 | ;; type to define, but it works. | 1023 | ;; type to define, but it works. |
| @@ -1040,7 +1040,7 @@ key (or menu-item)")) | |||
| 1040 | (frames-menu | 1040 | (frames-menu |
| 1041 | (cons 'keymap | 1041 | (cons 'keymap |
| 1042 | (cons "Select Frame" | 1042 | (cons "Select Frame" |
| 1043 | (mapcar '(lambda (frame) | 1043 | (mapcar (lambda (frame) |
| 1044 | (nconc (list frame | 1044 | (nconc (list frame |
| 1045 | (cdr (assq 'name | 1045 | (cdr (assq 'name |
| 1046 | (frame-parameters frame))) | 1046 | (frame-parameters frame))) |