Version changed to 1.1.12.

[m17n/m17n-contrib.git] / tbl2mim.awk

diff --git a/tbl2mim.awk b/tbl2mim.awk
index f22ac01..620e91e 100644 (file)
--- a/tbl2mim.awk
+++ b/tbl2mim.awk
@@ -1,4 +1,4 @@
-#!/usr/bin/gawk
+#!/usr/bin/gawk -f
 # Copyright (C) 2006
 #   National Institute of Advanced Industrial Science and Technology (AIST)
 #   Registration Number H15PRO112
@@ -27,7 +27,11 @@ BEGIN {
 
 /^ICON *=/ { ICON = " \""$3"\""; next; }
 /^NAME *=/ { NAME = tolower($3); next; }
-/^LANGUAGES *=/ { LANG = $3; next; }
+/^LANGUAGES *=/ {
+    LANG = $3;
+    if (LANG == "other")
+       LANG = "t";
+    next; }
 /^STATUS_PROMPT *=/ { TITLE = $3; next; }
 /^BEGIN_TABLE/ {
     printf "(input-method %s %s)\n", LANG, NAME;