From 173eb2c59c4f1eefabbd6c9a22b71258d20316cb Mon Sep 17 00:00:00 2001 From: tomo Date: Sat, 18 Sep 1999 02:47:36 +0000 Subject: [PATCH] (MIN_CHAR_HALFWIDTH_KATAKANA): Changed to 0xFF61 from 0xFF60. (MAKE_CHAR): Change offset for katakana-jisx0201 to 33 from 0x20. (breakup_char_1): Likewise. --- src/char-ucs.h | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/char-ucs.h b/src/char-ucs.h index 7302124..c683770 100644 --- a/src/char-ucs.h +++ b/src/char-ucs.h @@ -340,7 +340,7 @@ CHARSET_BY_LEADING_BYTE (Charset_ID lb) #define MIN_CHAR_THAI 0x0E00 #define MAX_CHAR_THAI 0x0E5F -#define MIN_CHAR_HALFWIDTH_KATAKANA 0xFF60 +#define MIN_CHAR_HALFWIDTH_KATAKANA 0xFF61 #define MAX_CHAR_HALFWIDTH_KATAKANA 0xFF9F #define MIN_CHAR_94 0xE90940 @@ -367,7 +367,7 @@ MAKE_CHAR (Lisp_Object charset, int c1, int c2) return decoding_table[c1 - (XCHARSET_CHARS (charset) == 94 ? 33 : 32)]; else if (EQ (charset, Vcharset_katakana_jisx0201)) if (c1 < 0x60) - return c1 + MIN_CHAR_HALFWIDTH_KATAKANA - 0x20; + return c1 + MIN_CHAR_HALFWIDTH_KATAKANA - 33; else /* return MIN_CHAR_94 + ('I' - '0') * 94 + (c1 - 33); */ return ' '; @@ -483,7 +483,7 @@ breakup_char_1 (Emchar c, Lisp_Object *charset, int *c1, int *c2) && (c <= MAX_CHAR_HALFWIDTH_KATAKANA)) { *charset = Vcharset_katakana_jisx0201; - *c1 = c - MIN_CHAR_HALFWIDTH_KATAKANA + 0x20; + *c1 = c - MIN_CHAR_HALFWIDTH_KATAKANA + 33; *c2 = 0; } else -- 1.7.10.4