[upmendex] add "kana_head" to style file option (#116)

texjporg · Jun 5, 2021 · 5bf039b · 5bf039b
1 parent 9dc78ab
commit 5bf039b
Show file tree

Hide file tree

Showing 4 changed files with 5 additions and 4 deletions.
diff --git a/source/texk/upmendex/exvar.h b/source/texk/upmendex/exvar.h
@@ -31,7 +31,7 @@ extern char symhead_positive[],symhead_negative[];
 extern char numhead_positive[],numhead_negative[];
 extern int symbol_flag;
 extern int letter_head;
-extern UChar atama[],tumunja[],hanzi_head[];
+extern UChar atama[],tumunja[],hanzi_head[],kana_head[];
 extern char page_compositor[],page_precedence[];
 extern char character_order[];
 extern char icu_locale[],icu_rules[];

diff --git a/source/texk/upmendex/main.c b/source/texk/upmendex/main.c
@@ -281,6 +281,7 @@ int main(int argc, char **argv)
 	default:
 		break;
 	}
+	if (u_strlen(kana_head)>0) u_strcpy(atama,kana_head);
 
 /*   read idx file   */
 

diff --git a/source/texk/upmendex/styfile.c b/source/texk/upmendex/styfile.c
@@ -132,8 +132,8 @@ void styread(const char *filename)
 			letter_head=atoi(&buff[cc]);
 			continue;
 		}
-		if (getparam(buff,"atama",tmp)) {
-			multibyte_to_widechar(atama,STYBUFSIZE,tmp);
+		if (getparam(buff,"kana_head",tmp)) {
+			multibyte_to_widechar(kana_head,STYBUFSIZE,tmp);
 			continue;
 		}
 		if (getparam(buff,"tumunja",tmp)) {

diff --git a/source/texk/upmendex/var.h b/source/texk/upmendex/var.h
@@ -32,7 +32,7 @@ char symhead_positive[STYBUFSIZE]={"Symbols"},symhead_negative[STYBUFSIZE]={"sym
 char numhead_positive[STYBUFSIZE]={"Numbers"},numhead_negative[STYBUFSIZE]={"numbers"};
 int symbol_flag=1;
 int letter_head=1;
-UChar atama[STYBUFSIZE],tumunja[STYBUFSIZE],hanzi_head[STYBUFSIZE]={L'\0'};
+UChar atama[STYBUFSIZE],tumunja[STYBUFSIZE],hanzi_head[STYBUFSIZE]={L'\0'},kana_head[STYBUFSIZE]={L'\0'};
 char page_compositor[STYBUFSIZE]={"-"},page_precedence[STYBUFSIZE]={"rnaRA"};
 char character_order[STYBUFSIZE]={"SNLGCJKH"};
 char icu_locale[STYBUFSIZE]={"root"},icu_rules[STYBUFSIZE]={""};