diff options
author | Stefan Kangas <stefan@marxist.se> | 2021-10-22 07:41:55 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2021-10-22 07:51:45 +0200 |
commit | 885448d1e66ba70faf3559e4028552fbb090aef5 (patch) | |
tree | 2fb367252f033922771966b9b781d18c17ece7f0 /lisp/frame.el | |
parent | 357d273d2e312fca7b187dca45585cbdbf4c6469 (diff) | |
download | emacs-885448d1e66ba70faf3559e4028552fbb090aef5.tar.gz emacs-885448d1e66ba70faf3559e4028552fbb090aef5.tar.bz2 emacs-885448d1e66ba70faf3559e4028552fbb090aef5.zip |
; Revert parts of previous commit
* admin/unidata/unidata-gen.el (unidata-gen-table)
(unidata-gen-table-symbol, unidata-gen-table-integer)
(unidata-gen-table-numeric, unidata-gen-table-word-list)
(unidata-describe-decomposition):
* lisp/composite.el (unicode-category-table):
* lisp/files.el (recover-file):
* lisp/frame.el (frames-on-display-list, frame-background-mode):
* lisp/language/indian.el (script-regexp-alist): Revert parts of
previous commit; it seemed innocent but caused issues.
Diffstat (limited to 'lisp/frame.el')
-rw-r--r-- | lisp/frame.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index dfbd751201f..2c73737a541 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -987,8 +987,8 @@ HOST:SERVER.SCREEN). If DEVICE is omitted or nil, it defaults to the selected frame's terminal device." (let* ((terminal (get-device-terminal device)) - (func (lambda (frame) - (eq (frame-terminal frame) terminal)))) + (func #'(lambda (frame) + (eq (frame-terminal frame) terminal)))) (filtered-frame-list func))) (defun framep-on-display (&optional terminal) @@ -1165,9 +1165,9 @@ If you change this without using customize, you should use `frame-set-background-mode' to update existing frames; e.g. (mapc \\='frame-set-background-mode (frame-list))." :group 'faces - :set (lambda (var value) - (set-default var value) - (mapc #'frame-set-background-mode (frame-list))) + :set #'(lambda (var value) + (set-default var value) + (mapc #'frame-set-background-mode (frame-list))) :initialize #'custom-initialize-changed :type '(choice (const dark) (const light) |