aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/charset.c8
1 files changed, 6 insertions, 2 deletions
diff --git a/src/charset.c b/src/charset.c
index 58123244486..21583c8e8c3 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -967,13 +967,17 @@ DEFUN ("make-char-internal", Fmake_char_internal, Smake_char_internal, 1, 3, 0,
967 } 967 }
968 else if (charset_id == CHARSET_8_BIT_CONTROL) 968 else if (charset_id == CHARSET_8_BIT_CONTROL)
969 { 969 {
970 if (c1 < 0x80 || c1 > 0x9F) 970 if (NILP (code1))
971 c1 = 0x80;
972 else if (c1 < 0x80 || c1 > 0x9F)
971 goto invalid_code_posints; 973 goto invalid_code_posints;
972 return make_number (c1); 974 return make_number (c1);
973 } 975 }
974 else if (charset_id == CHARSET_8_BIT_GRAPHIC) 976 else if (charset_id == CHARSET_8_BIT_GRAPHIC)
975 { 977 {
976 if (c1 < 0xA0 || c1 > 0xFF) 978 if (NILP (code1))
979 c1 = 0xA0;
980 else if (c1 < 0xA0 || c1 > 0xFF)
977 goto invalid_code_posints; 981 goto invalid_code_posints;
978 return make_number (c1); 982 return make_number (c1);
979 } 983 }