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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 998f115b97ff2a7da9eabce1286e292d637dbb74..1f644cbea2644aa5a94270661f741943b9c1df0c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -7,6 +7,13 @@
        * generic.el (generic-make-keywords-list): Fix docstring.
        (generic-mode-internal): Simplify generic-font-lock-keywords.
 
+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

diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index b052a3e3460b9de82df0c34f7c2639bae33b213b..c0d9280a4415e6efa66df36683aaf89932c1b2f9 100644 (file)
--- 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))))