(Fdefine_coding_system_internal): Fix previous change.

1 files changed, 3 insertions, 0 deletions

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))
     {