Mercurial > emacs

changeset 18799:6c0d648d2cf8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(describe-current-coding-system): Use coding-category-iso-7-else instead of coding-category-iso-else.
author Kenichi Handa <handa@m17n.org>
date Tue, 15 Jul 1997 08:24:47 +0000
parents d4c708a5f181
children afc6404f9637
files lisp/international/mule-diag.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-diag.el	Tue Jul 15 08:24:47 1997 +0000
+++ b/lisp/international/mule-diag.el	Tue Jul 15 08:24:47 1997 +0000
@@ -314,7 +314,7 @@
   from these, and therefore cannot be recognized automatically
   with the present coding system priorities.\n\n")
 
-      (let ((categories '(coding-category-iso-7 coding-category-iso-else))
+      (let ((categories '(coding-category-iso-7 coding-category-iso-7-else))
 	    coding-system codings)
 	(while categories
 	  (setq coding-system (symbol-value (car categories)))
@@ -468,7 +468,7 @@
 	  coding-system)
       (while bases
 	(setq coding-system (car bases))
-	(if (interactive-p)
+	(if (null arg)
 	    (print-coding-system-briefly coding-system 'doc-string)
 	  (print-coding-system coding-system))
 	(setq bases (cdr bases))))))