(mode-line-mule-info): Don't show the tip with

buffer-file-coding-system if that is nil.

2 files changed, 14 insertions, 6 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6e445fc8108..1dced20e163 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-07-06  Eli Zaretskii  <eliz@is.elta.co.il>
+
+        * bindings.el (mode-line-mule-info): Don't show the tip with
+        buffer-file-coding-system if that is nil.
+
 2001-07-05  Gerd Moellmann  <gerd@gnu.org>
 
         * calendar/todo-mode.el (todo-top-priorities): Use delete-region
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 10a098be306..519d2b59c30 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -137,12 +137,15 @@ corresponding to the mode line clicked."
       (purecopy (lambda (window object point)
                   (save-window-excursion
                     (select-window window)
-                    (if enable-multibyte-characters
-                        (concat (symbol-name buffer-file-coding-system)
-                                " buffer; see M-x describe-coding-system")
-                      (concat "Unibyte "
-                              (symbol-name buffer-file-coding-system)
-                              " buffer")))))))
+                    ;; Don't show this tip if the coding system is nil,
+                    ;; it reads like a bug, and is not useful anyway.
+                    (when buffer-file-coding-system
+                      (if enable-multibyte-characters
+                          (concat (symbol-name buffer-file-coding-system)
+                                  " buffer; see M-x describe-coding-system")
+                        (concat "Unibyte "
+                                (symbol-name buffer-file-coding-system)
+                                " buffer"))))))))
   "Mode-line control for displaying information of multilingual environment.
 Normally it displays current input method (if any activated) and
 mnemonics of the following coding systems: