# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1165217641 0
# Node ID ee60f0fe10d698cb9fd55b0f22914f4739be8ee4
# Parent  4b5dd1d28ff0b7d6f389d7d38c4c73d4ade4a623
(whitespace-cleanup-internal): Use current
argument for recursive call.

diff -r 4b5dd1d28ff0 -r ee60f0fe10d6 lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Dec 04 06:51:21 2006 +0000
+++ b/lisp/ChangeLog	Mon Dec 04 07:34:01 2006 +0000
@@ -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 -r 4b5dd1d28ff0 -r ee60f0fe10d6 lisp/whitespace.el
--- a/lisp/whitespace.el	Mon Dec 04 06:51:21 2006 +0000
+++ b/lisp/whitespace.el	Mon Dec 04 07:34:01 2006 +0000
@@ -571,7 +571,7 @@
 
 	;; 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