summaryrefslogtreecommitdiff
path: root/Build/source/texk/upmendex
diff options
context:
space:
mode:
authorTakuji Tanaka <ttk@t-lab.opal.ne.jp>2022-09-17 13:22:22 +0000
committerTakuji Tanaka <ttk@t-lab.opal.ne.jp>2022-09-17 13:22:22 +0000
commit4ae9ee3197f4d1686ee6761818e365fd03544bd3 (patch)
tree5299817da8fdad3a8e474f34990c3f460979d8c7 /Build/source/texk/upmendex
parent3ad0c9eb16f9542a97e73894d5b3c6a37e96b997 (diff)
upmendex: Fix a bug on Thai words
git-svn-id: svn://tug.org/texlive/trunk@64420 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/upmendex')
-rw-r--r--Build/source/texk/upmendex/ChangeLog5
-rw-r--r--Build/source/texk/upmendex/fwrite.c11
2 files changed, 15 insertions, 1 deletions
diff --git a/Build/source/texk/upmendex/ChangeLog b/Build/source/texk/upmendex/ChangeLog
index 083e393613e..752a08a0c99 100644
--- a/Build/source/texk/upmendex/ChangeLog
+++ b/Build/source/texk/upmendex/ChangeLog
@@ -1,3 +1,8 @@
+2022-09-17 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
+
+ * fwrite.c:
+ Fix a bug on Thai words started with vowel followed by consonant.
+
2022-09-11 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
* version 1.03 Stable version.
diff --git a/Build/source/texk/upmendex/fwrite.c b/Build/source/texk/upmendex/fwrite.c
index ae5e91e808b..bd8aebb5268 100644
--- a/Build/source/texk/upmendex/fwrite.c
+++ b/Build/source/texk/upmendex/fwrite.c
@@ -927,11 +927,20 @@ static void index_normalize(UChar *istr, UChar *ini, int *chset)
u_strcpy(ini,hz_index[lo-1].idx);
return;
}
+ else if (is_thai(&ch)) {
+ if (istr[0]>=0x0E2F && (istr[1]>0x0E00 && istr[1]<0x0E2F)) {
+ /* Vowel followed by Consonant */
+ ini[0]=istr[1];
+ } else {
+ ini[0]=istr[0];
+ }
+ return;
+ }
else if (is_devanagari(istr)==2) {
ini[0]=istr[0]; ini[1]=istr[1]; ini[2]=L'\0';
return;
}
- else if (is_devanagari(&ch)||is_thai(&ch)||is_arabic(&ch)||is_hebrew(&ch)) {
+ else if (is_devanagari(&ch)||is_arabic(&ch)||is_hebrew(&ch)) {
if (ch==0x626) { /* Arabic Letter Yeh with Hamza Above for Uyghur */
strY[0]=0x626; strY[1]=L'\0'; /* Yeh with Hamza Above */
strZ[0]=0x628; strZ[1]=L'\0'; /* Beh */