(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