Respect user preference

2 files changed, 5 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 867eb82045d..42770d32987 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,6 +1,8 @@
 2003-06-10  Rajesh Vaidheeswarran  <rv@gnu.org>
 
         * whitespace.el (whitespace-version): bump to 3.3
+        (whitespace-cleanup): Respect user preference for silence
+
         * whitespace.el: Remove :tag in commentary :link. Remove empty
         lines in comment, since commentary seems to have a problem with that.
         
diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index 7750c194f9a..a833e85fa3f 100644
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -5,7 +5,7 @@
 ;; Author: Rajesh Vaidheeswarran <rv@gnu.org>
 ;; Keywords: convenience
 
-;; $Id: whitespace.el,v 1.23 2003/05/13 14:30:58 rv Exp $
+;; $Id: whitespace.el,v 1.24 2003/06/11 03:50:45 rv Exp $
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
@@ -570,7 +570,8 @@ whitespace problems."
         (if whitespace-any
             (whitespace-cleanup)
           (progn
-            (message "%s clean" buffer-file-name)
+            (if (not whitespace-silent)
+                (message "%s clean" buffer-file-name))
             (whitespace-update-modeline)))
         (setq tab-width whitespace-tabwith-saved))))