From: Kenichi Handa <handa@m17n.org>
Date: Thu, 21 May 1998 01:46:39 +0000 (+0000)
Subject: (make-coding-system): If ISO2022 based
X-Git-Tag: emacs-20.3~917
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3ad911d8a01ba613600a767c6bcca65a7c8d56fb;p=emacs.git

(make-coding-system): If ISO2022 based
8-bit coding system allows alternative designation, set the coding
category to `coding-category-iso-8-else'.
---

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 9929ddbcac9..76792e6197d 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -584,7 +584,8 @@ a value of `safe-charsets' in PLIST."
 			   (if no-alternative-designation
 			       'coding-category-iso-7-tight
 			     'coding-category-iso-7))
-		       (if no-initial-designation
+		       (if (or no-initial-designation
+			       (not no-alternative-designation))
 			   'coding-category-iso-8-else
 			 (if (and (charsetp g1-designation)
 				  (= (charset-dimension g1-designation) 2))