*** empty log message ***
[m17n/m17n-db.git] / LANGNAME.awk
index 514b573..5f5e5fd 100644 (file)
@@ -74,6 +74,8 @@ BEGIN {
     }
     print ";;  Delete duplicated names after the above modifications.";
     print "";
+    printf "(language name %s)\n", LANG;
+    print "";
 }
 
 {
@@ -88,8 +90,9 @@ BEGIN {
            else {
                gsub(" \\(Other\\)$", "", name);
                gsub(" languages$", "", name);
-               if (name ~ /\\(.*[0-9].*\\)$/)
+               if (name ~ /\(.*[0-9].*\)$/) {
                    gsub(" \\([^)]*\\)$", "", name);
+               }
                if (name ~ ", ") {
                    split(name,array2,", ");
                    name = array2[2] " " array2[1];
@@ -107,8 +110,8 @@ BEGIN {
                gsub(", autres langues$", "", name);
                gsub(", autres$", "", name);
                gsub(", langues$", "", name);
-               gsub(", langues (famille)$", "", name);
-               if (name ~ /\\(.*[0-9].*\\)$/)
+               gsub(", langues \\(famille\\)$", "", name);
+               if (name ~ /\(.*[0-9].*\)$/)
                    gsub(" \\([^)]*\\)$", "", name);
                if (name ~ ", ") {
                    split(name,array2,", ");