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 | b27614ceff00069db05489d08a07c50b14b33971 (patch) | |
| tree | 64ff506105893703354a97c20862d4a14c1dbc9d /lisp/calc/calc-mode.el | |
| parent | 2528da6a32002a7d597784e4dde02453625f68ef (diff) | |
| download | emacs-b27614ceff00069db05489d08a07c50b14b33971.tar.gz emacs-b27614ceff00069db05489d08a07c50b14b33971.tar.bz2 emacs-b27614ceff00069db05489d08a07c50b14b33971.zip | |
(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 |