From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Sun, 12 Apr 2015 11:01:24 +0000 (+0100)
Subject: * lisp/files.el: Don't message when nothing happened
X-Git-Tag: emacs-25.0.90~2474
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ad36067a1ea2204c51018de63e8eb2b71879ecb0;p=emacs.git

* lisp/files.el: Don't message when nothing happened

(save-some-buffers, basic-save-buffer): Before messaging to say
"nothing was saved" check if (called-interactively-p 'any).
---

diff --git a/lisp/files.el b/lisp/files.el
index eca52e0ddd3..7a662594bb6 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4783,7 +4783,9 @@ Before and after saving the buffer, this function runs
 	  ;; Support VC `implicit' locking.
 	  (vc-after-save)
 	  (run-hooks 'after-save-hook))
-      (or noninteractive (message "(No changes need to be saved)")))))
+      (or noninteractive
+          (not (called-interactively-p 'any))
+          (message "(No changes need to be saved)")))))
 
 ;; This does the "real job" of writing a buffer into its visited file
 ;; and making a backup file.  This is what is normally done
@@ -5024,7 +5026,8 @@ change the additional actions you can take on files."
       (or queried (> files-done 0) abbrevs-done
 	  (cond
 	   ((null autosaved-buffers)
-	    (message "(No files need saving)"))
+            (when (called-interactively-p 'any)
+              (message "(No files need saving)")))
 	   ((= (length autosaved-buffers) 1)
 	    (message "(Saved %s)" (car autosaved-buffers)))
 	   (t