summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2000-10-24 15:06:14 +0000
committerGerd Moellmann <gerd@gnu.org>2000-10-24 15:06:14 +0000
commit53bb90cad6cb468348570018430e68bf09a0508d (patch)
tree6cf5e7a76b8ac07dd8bf86a616d90f578b41f11f /lisp
parent2488aba5ed81e2f7cb006fbbfba94a87dccb65c3 (diff)
downloademacs-53bb90cad6cb468348570018430e68bf09a0508d.tar.gz
emacs-53bb90cad6cb468348570018430e68bf09a0508d.tar.bz2
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.el2
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."
(format "%s has auto save data; consider M-x recover-file"
(file-name-nondirectory buffer-file-name))
(setq not-serious t)
- (if error "(New file)" nil)))
+ (if (and warn error) "(New file)" nil)))
((not error)
(setq not-serious t)
"Note: file is write protected")