mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-17 17:58:46 +00:00
(Edit-options-{set,toggle,t,nil}): Don't quote lambda.
This commit is contained in:
parent
057ab2946f
commit
7a3ec18a3c
@ -112,16 +112,16 @@ For convenience, the characters \\[backward-paragraph] and \\[forward-paragraph]
|
||||
|
||||
(defun Edit-options-set () (interactive)
|
||||
(Edit-options-modify
|
||||
'(lambda (var) (eval-minibuffer (concat "New " (symbol-name var) ": ")))))
|
||||
(lambda (var) (eval-minibuffer (concat "New " (symbol-name var) ": ")))))
|
||||
|
||||
(defun Edit-options-toggle () (interactive)
|
||||
(Edit-options-modify '(lambda (var) (not (symbol-value var)))))
|
||||
(Edit-options-modify (lambda (var) (not (symbol-value var)))))
|
||||
|
||||
(defun Edit-options-t () (interactive)
|
||||
(Edit-options-modify '(lambda (var) t)))
|
||||
(Edit-options-modify (lambda (var) t)))
|
||||
|
||||
(defun Edit-options-nil () (interactive)
|
||||
(Edit-options-modify '(lambda (var) nil)))
|
||||
(Edit-options-modify (lambda (var) nil)))
|
||||
|
||||
(defun Edit-options-modify (modfun)
|
||||
(save-excursion
|
||||
|
Loading…
Reference in New Issue
Block a user