diff options
| author | Gerd Moellmann | 2000-10-24 15:06:14 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2000-10-24 15:06:14 +0000 |
| commit | 53bb90cad6cb468348570018430e68bf09a0508d (patch) | |
| tree | 6cf5e7a76b8ac07dd8bf86a616d90f578b41f11f /lisp | |
| parent | 2488aba5ed81e2f7cb006fbbfba94a87dccb65c3 (diff) | |
| download | emacs-53bb90cad6cb468348570018430e68bf09a0508d.tar.gz emacs-53bb90cad6cb468348570018430e68bf09a0508d.zip | |
(after-find-file): Don't print a message ``New file''
if WARN is nil.
Diffstat (limited to 'lisp')
| -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 e0277befbc1..b4e30207bfc 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -1263,7 +1263,7 @@ unless NOMODES is non-nil." | |||
| 1263 | (format "%s has auto save data; consider M-x recover-file" | 1263 | (format "%s has auto save data; consider M-x recover-file" |
| 1264 | (file-name-nondirectory buffer-file-name)) | 1264 | (file-name-nondirectory buffer-file-name)) |
| 1265 | (setq not-serious t) | 1265 | (setq not-serious t) |
| 1266 | (if error "(New file)" nil))) | 1266 | (if (and warn error) "(New file)" nil))) |
| 1267 | ((not error) | 1267 | ((not error) |
| 1268 | (setq not-serious t) | 1268 | (setq not-serious t) |
| 1269 | "Note: file is write protected") | 1269 | "Note: file is write protected") |