* bindings.el (mode-line-eol-desc): Fix typo in help message.

  (mode-line-client): Fix typo in help message and docstring.

2 files changed, 8 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 488da112eae..adb402c2912 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-01-02  Juanma Barranquero  <lekktu@gmail.com>
+
+        * bindings.el (mode-line-eol-desc): Fix typo in help message.
+        (mode-line-client): Fix typo in help message and docstring.
+
 2009-01-02  Jason Rumney  <jasonr@gnu.org>
 
         * term/w32-win.el (image-library-alist): Add gobject library.
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 245050dab71..835d3e6f583 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -155,7 +155,7 @@ corresponding to the mode line clicked."
              mnemonic
              'help-echo (format "End-of-line style: %s\nmouse-1 to cycle"
                                 (if (eq eol 0) "Unix-style LF"
-                                  (if (eq eol 1) "Dos-style CRLF"
+                                  (if (eq eol 1) "DOS-style CRLF"
                                     (if (eq eol 2) "Mac-style CR"
                                       "Undecided"))))
              'keymap
@@ -170,8 +170,8 @@ corresponding to the mode line clicked."
 (defvar mode-line-client
   `(""
     (:propertize ("" (:eval (if (frame-parameter nil 'client) "@" "")))
-                 help-echo "Emacsclient frame"))
-  "Mode-line control for identifying Emacsclient frames.")
+                 help-echo "emacsclient frame"))
+  "Mode-line control for identifying emacsclient frames.")
 
 (defvar mode-line-mule-info
   `(""