New version 13.2. (Bug#7582)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cb797763cbd8f4a2b7120afc882596e5c39ca853..2a47c160100baf7a5e3a8598ad9d2dcd59f2d6ed 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-12-08  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
+
+       * whitespace.el: New version 13.2.
+       (whitespace-cleanup-region): Tiny code fix.  (Bug#7582)
+
 2010-12-08  Karl Fogel  <kfogel@red-bean.com>
 
        * bookmark.el: Adjust parameter names and doc strings to resolve

diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index 4b8b9a611733ad83efcad70f556029e6618a70f2..57858ed4067d93106e541d7701055405f37e5576 100644 (file)
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -6,7 +6,7 @@
 ;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br>
 ;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br>
 ;; Keywords: data, wp
-;; Version: 13.1
+;; Version: 13.2
 ;; X-URL: http://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
 
 ;; This file is part of GNU Emacs.
@@ -1652,12 +1652,12 @@ documentation."
            (whitespace-replace-action
             (if whitespace-indent-tabs-mode 'tabify 'untabify)
             rstart rend whitespace-space-before-tab-regexp
-            (if whitespace-indent-tabs-mode 1 2)))
+            (if whitespace-indent-tabs-mode 0 2)))
           ;; ACTION: replace SPACEs before TAB by TABs.
           ((memq 'space-before-tab::tab whitespace-style)
            (whitespace-replace-action
             'tabify rstart rend
-            whitespace-space-before-tab-regexp 1))
+            whitespace-space-before-tab-regexp 0))
           ;; ACTION: replace TABs by SPACEs.
           ((memq 'space-before-tab::space whitespace-style)
            (whitespace-replace-action