summaryrefslogtreecommitdiff
path: root/lisp/whitespace.el
diff options
context:
space:
mode:
authorRajesh Vaidheeswarran <rv@gnu.org>2005-04-11 23:47:54 +0000
committerRajesh Vaidheeswarran <rv@gnu.org>2005-04-11 23:47:54 +0000
commitdf5e8d2c04276e6d5815543e19699afc6f5f6377 (patch)
treef152bda2399d2ec400a30d16419154f53ecfbf19 /lisp/whitespace.el
parent4d88e0ade83e1b7e6e7df2ab70c50210a4e6983c (diff)
downloademacs-df5e8d2c04276e6d5815543e19699afc6f5f6377.tar.gz
whitespace.el - revert hasty fix, fix highlight area for leading and trailing space.
Diffstat (limited to 'lisp/whitespace.el')
-rw-r--r--lisp/whitespace.el8
1 files changed, 4 insertions, 4 deletions
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))))