Added proper interpretation of infostrings/weights.

giellalt · Nov 8, 2024 · 871093a · 871093a
1 parent 3d3402e
commit 871093a
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/tools/shellscripts/add-lexicon-and-tag-flags-2-lexc.sh b/tools/shellscripts/add-lexicon-and-tag-flags-2-lexc.sh
@@ -87,11 +87,12 @@ END {
           gsub("0", "%0", lexflag);
         }
       else
-      if(match(line[i], "^([^!;]+)(;)(.*)$", f)!=0)
+      if(match(line[i], "^([^!;\"]+)(\"[^\"]+\"[ ]*)?([!;])(.*)$", f)!=0)
       {
         content=f[1];
-        sep=f[2];
-        comment=f[3];
+        infostr=f[2];
+        sep=f[3];
+        comment=f[4];
 
         n=split(content, ff, ":")
         if(n==2)
@@ -177,7 +178,7 @@ END {
               }
           }
 
-        print content sep comment;
+        printf "%s%s%s%s\n", content, infostr, sep, comment;
 
       }
       else