whitespace.el - revert hasty fix, fix highlight area for leading and trailing space.

2 files changed, 11 insertions, 4 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 998f115b97f..1f644cbea26 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -9,6 +9,13 @@
 
 2005-04-11  Rajesh Vaidheeswarran  <rv@gnu.org>
 
+        * whitespace.el (whitespace-buffer-leading,
+        whitespace-buffer-trailing): Revert the incorrect test
+        inversion. However, fix the highlight area for the leading and
+        trailing whitespaces to show space.
+
+2005-04-11  Rajesh Vaidheeswarran  <rv@gnu.org>
+
         * whitespace.el (whitespace-version): Bump to 3.5
 
         (whitespace-buffer-leading, whitespace-buffer-trailing): Invert
diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index b052a3e3460..c0d9280a441 100644
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -597,9 +597,9 @@ whitespace problems."
       (setq pmin (point))
       (end-of-line)
       (setq pmax (point))
-      (if (not (equal pmin pmax))
+      (if (equal pmin pmax)
           (progn
-            (whitespace-highlight-the-space pmin pmax)
+            (whitespace-highlight-the-space pmin (1+ pmax))
             t)
         nil))))
 
@@ -635,9 +635,9 @@ whitespace problems."
             (setq pmin (point))
             (end-of-line)
             (setq pmax (point))
-            (if (not (equal pmin pmax))
+            (if (equal pmin pmax)
                 (progn
-                  (whitespace-highlight-the-space pmin pmax)
+                  (whitespace-highlight-the-space (- pmin 1) pmax)
                   t)
               nil))
         nil))))