From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 24 Oct 2000 15:06:14 +0000 (+0000)
Subject: (after-find-file): Don't print a message ``New file''
X-Git-Tag: emacs-pretest-21.0.90~618
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=53bb90cad6cb468348570018430e68bf09a0508d;p=emacs.git

(after-find-file): Don't print a message ``New file''
if WARN is nil.
---

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")