From: Kenichi Handa <handa@m17n.org>
Date: Wed, 16 Oct 2002 09:12:55 +0000 (+0000)
Subject: (Fdefine_coding_system_internal): Fix previous change.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~227
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0ce7886f8dc08eaf195578fc066751f264d24f64;p=emacs.git

(Fdefine_coding_system_internal): Fix previous change.
---

diff --git a/src/coding.c b/src/coding.c
index 9c18a9d3036..c4f927459ff 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -7720,6 +7720,9 @@ usage: (define-coding-system-internal ...)  */)
 		      ? coding_category_iso_8_1
 		      : coding_category_iso_8_2);
 	}
+      if (category != coding_category_iso_8_1
+	  && category != coding_category_iso_8_2)
+	CODING_ATTR_ASCII_COMPAT (attrs) = Qnil;
     }
   else if (EQ (coding_type, Qemacs_mule))
     {