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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 24963d909ff7156f6ef665421444ed4c65e62691..7e418a357217008c5f1216bae696afb86d7b3824 100644 (file)
--- 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 1b737b5bb008a894b3ad73d08036147d0a252a26..e3ce8a4dc27355c4910f1f466d79cc5bd65e8e42 100644 (file)
--- 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