Merge pull request #12 from ptomato/master

More portable awk script

1 files changed, 14 insertions, 8 deletions

diff --git a/lig.awk b/lig.awk
index 6737170..4ea5e46 100644
--- a/lig.awk
+++ b/lig.awk
@@ -24,14 +24,20 @@ c=b
 c!=b { print c }
 
 /f[1-9]?$/ {
-	print gensub("f[1-9]?$", "ff", "g", b);
-	if (c!=b) print gensub("f[1-9]?$", "ff", "g", c);
-
-	print gensub("f[1-9]?$", "fi", "g", b);
-	if (c!=b) print gensub("f[1-9]?$", "fi", "g", c);
-
-	print gensub("f[1-9]?$", "fl", "g", b);
-	if (c!=b) print gensub("f[1-9]?$", "fl", "g", c);
+	out=b; gsub("f[1-9]?$", "ff", out); print out
+	if (c!=b) {
+		out=c; gsub("f[1-9]?$", "ff", out); print out
+	}
+
+	out=b; gsub("f[1-9]?$", "fi", out); print out
+	if (c!=b) {
+		out=c; gsub("f[1-9]?$", "fi", out); print out
+	}
+
+	out=b; gsub("f[1-9]?$", "fl", out); print out
+	if (c!=b) {
+		out=c; gsub("f[1-9]?$", "fl", out); print out
+	}
 }