(global-whitespace-mode): Fix modeline lighter.

2 files changed, 8 insertions, 4 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 24963d909ff..7e418a35721 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-02-01  Juanma Barranquero  <lekktu@gmail.com>
+
+        * whitespace.el (global-whitespace-mode): Fix modeline lighter.
+
 2008-02-01  Thien-Thi Nguyen  <ttn@gnuvola.org>
 
         * vc.el (vc-update): Fix bug: Specify branch tip as
@@ -31,7 +35,7 @@
 2008-02-01  Martin Rudalics  <rudalics@gmx.at>
 
         * mail/rmail.el (rmail-highlight): Fix specification.
-        Reported by: pod <pod@herald.ox.ac.uk>.
+        Reported by pod <pod@herald.ox.ac.uk>.
 
 2008-02-01  Stefan Monnier  <monnier@iro.umontreal.ca>
 
@@ -47,9 +51,9 @@
 
 2008-01-31  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
 
-        * blank-mode.el: Renamed to whitespace.el.
+        * blank-mode.el: Rename to whitespace.el.
 
-        * obsolete/whitespace.el: Renamed to obsolete/old-whitespace.el.
+        * obsolete/whitespace.el: Rename to obsolete/old-whitespace.el.
 
 2008-01-31  Stefan Monnier  <monnier@iro.umontreal.ca>
 
diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index 1b737b5bb00..e3ce8a4dc27 100644
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -908,7 +908,7 @@ If ARG is null, toggle whitespace visualization.
 If ARG is a number greater than zero, turn on visualization;
 otherwise, turn off visualization.
 Only useful with a windowing system."
-  :lighter    " BL"
+  :lighter    " WS"
   :init-value nil
   :global     t
   :group      'whitespace