diff lisp/whitespace.el @ 51543:38c9480b767a

Respect user preference
author Rajesh Vaidheeswarran <rv@gnu.org>
date Wed, 11 Jun 2003 04:00:33 +0000
parents ad8c09d9513c
children 695cf19ef79e
line wrap: on
line diff
--- a/lisp/whitespace.el	Wed Jun 11 03:50:45 2003 +0000
+++ b/lisp/whitespace.el	Wed Jun 11 04:00:33 2003 +0000
@@ -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 @@
 	(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))))