diff options
| author | Colin Walters <walters@gnu.org> | 2002-09-30 04:25:15 +0000 |
|---|---|---|
| committer | Colin Walters <walters@gnu.org> | 2002-09-30 04:25:15 +0000 |
| commit | b1ab2ffc839850ac8d78e7edfb7a54132beabd29 (patch) | |
| tree | 7e6c906a530a1609ce766297ab623fef22c5b7da /lisp/calc/calc-mode.el | |
| parent | df970fca4126fce8646d078c695324833260c981 (diff) | |
| download | emacs-b1ab2ffc839850ac8d78e7edfb7a54132beabd29.tar.gz | |
(calc-save-modes): Remove `quiet' arg; Don't bind `executing-kbd-macro'.
Diffstat (limited to 'lisp/calc/calc-mode.el')
| -rw-r--r-- | lisp/calc/calc-mode.el | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lisp/calc/calc-mode.el b/lisp/calc/calc-mode.el index 9d26ea50e45..50bdf9854be 100644 --- a/lisp/calc/calc-mode.el +++ b/lisp/calc/calc-mode.el @@ -267,7 +267,7 @@ ;;; Mode commands. -(defun calc-save-modes (&optional quiet) +(defun calc-save-modes () (interactive) (calc-wrapper (let (pos @@ -308,11 +308,7 @@ vals (cdr vals)))) (run-hooks 'calc-mode-save-hook) (insert ";;; End of mode settings\n") - (if quiet - ;; FIXME: why is this here? -cgw 2001.11.12 - (let ((executing-kbd-macro "")) ; what a kludge! - (save-buffer)) - (save-buffer))))) + (save-buffer)))) (defun calc-settings-file-name (name &optional arg) (interactive |