(Fdefine_coding_system_internal): Fix category setting

for a coding system of type iso-2022.

diff --git a/src/coding.c b/src/coding.c
index c53760a07c0a1a7445d64756228d27c5eb5f44e7..a6cf9ce78446a87ebb5f713e68977509ea16e54a 100644 (file)
--- a/src/coding.c
+++ b/src/coding.c
@@ -7599,8 +7599,7 @@ usage: (define-coding-system-internal ...)  */)
        {
          int id = XINT (AREF (initial, 1));
 
-         category = (((i & (CODING_ISO_FLAG_LOCKING_SHIFT
-                            | CODING_ISO_FLAG_SINGLE_SHIFT))
+         category = (((i & CODING_ISO_FLAG_LOCKING_SHIFT)
                       || EQ (args[coding_arg_charset_list], Qiso_2022)
                       || id < 0)
                      ? coding_category_iso_8_else