1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00

(menu-bar-update-buffers, menu-bar-update-buffers): Don't quote lambda.

This commit is contained in:
Stefan Monnier 2000-06-12 05:19:26 +00:00
parent d6373ed514
commit f2116cf90d

View File

@ -1017,7 +1017,7 @@ key (or menu-item)"))
"List All Buffers"))
;; Now make the actual list of items,
;; ending with the list-buffers item.
(nconc (mapcar '(lambda (pair)
(nconc (mapcar (lambda (pair)
;; This is somewhat risque, to use
;; the buffer name itself as the event
;; type to define, but it works.
@ -1040,7 +1040,7 @@ key (or menu-item)"))
(frames-menu
(cons 'keymap
(cons "Select Frame"
(mapcar '(lambda (frame)
(mapcar (lambda (frame)
(nconc (list frame
(cdr (assq 'name
(frame-parameters frame)))