--- lig.awk.orig	2010-03-04 12:13:47 UTC
+++ 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);
+	out=b; gsub("f[1-9]?$", "ff", out); print out
+	if (c!=b) {
+		out=c; gsub("f[1-9]?$", "ff", out); print out
+	}
 
-	print gensub("f[1-9]?$", "fi", "g", b);
-	if (c!=b) print gensub("f[1-9]?$", "fi", "g", c);
+	out=b; gsub("f[1-9]?$", "fi", out); print out
+	if (c!=b) {
+		out=c; gsub("f[1-9]?$", "fi", out); print out
+	}
 
-	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]?$", "fl", out); print out
+	if (c!=b) {
+		out=c; gsub("f[1-9]?$", "fl", out); print out
+	}
 }