diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-04-06 19:25:20 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-04-06 19:25:20 +0000 |
| commit | 1eaeb7e932fb0bef52faea32624e122ca4583676 (patch) | |
| tree | d53bfdff49c95fd37438cb1fc7ea1e368e3ceec8 | |
| parent | af7f78ead88752232d3269354e7ea5ea2c5c719a (diff) | |
| download | emacs-1eaeb7e932fb0bef52faea32624e122ca4583676.tar.gz | |
(write-file): Fix arg count in call to y-or-n-p.
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 199f9b13731..868977416a7 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1354,7 +1354,7 @@ old name in that directory." (setq filename (concat (file-name-as-directory filename) (file-name-nondirectory buffer-file-name)))) (if (file-exists-p filename) - (or (y-or-n-p "File `%s' exists; overwrite? " filename) + (or (y-or-n-p (format "File `%s' exists; overwrite? " filename)) (error "Canceled"))) (set-visited-file-name filename))) (set-buffer-modified-p t) |