1
0
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:
Stefan Monnier 2000-08-16 20:54:44 +00:00
parent 057ab2946f
commit 7a3ec18a3c

View File

@ -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