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

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6e445fc81080866dc0699905a8a94993ca034150..1dced20e1637f97a02ad7c13f5d407db610b16ec 100644 (file)
--- 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 10a098be306a6ac0b61506b7d73af6081f3f79cb..519d2b59c304b92dc87070577461ca89aa512fc8 100644 (file)
--- 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: