From: Dan Nicolaescu <dann@ics.uci.edu>
Date: Mon, 4 Dec 2006 07:34:01 +0000 (+0000)
Subject: (whitespace-cleanup-internal): Use current
X-Git-Tag: emacs-pretest-22.0.92~326
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2b058c727ef14a3fe205c99c0b5191820b285480;p=emacs.git

(whitespace-cleanup-internal): Use current
argument for recursive call.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 990c3c39ca3..86d6f6acfd6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-12-04  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* whitespace.el (whitespace-cleanup-internal): Use current
+	argument for recursive call.
+
 2006-12-04  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp.el (tramp-methods): Add "ControlPath" and
diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index cdb743c1494..74943da4413 100644
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -571,7 +571,7 @@ See `whitespace-buffer' docstring for a summary of the problems."
 
 	;; Call this recursively till everything is taken care of
 	(if whitespace-any
-	    (whitespace-cleanup-internal)
+	    (whitespace-cleanup-internal region-only)
 	  ;; if we are done, talk to the user
 	  (progn
 	    (unless whitespace-silent