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