shithub: sm2

Info  •  Files  •  Log  •  Branches

sm2geradd: handle noun definitions

--- a/bin/sm2geradd

+++ b/bin/sm2geradd

@@ -5,14 +5,16 @@

 	close(last)

 }

 $1 != ""{

-	f=$1

+	f = $1

+	gsub("[\\[\\(,]+.*", "", f)

+	h = f

 	gsub(" ", ".", f)

-	last=p "/" f ".t"

+	last = p "/" f ".t"

 	if(system("test -f " last) == 0)

 		print f ": appending to existing file"

 	else

 		print "2.5 0 0 0 " f ".pdf" >>dict

-	printf "%s\n.Bp\n%s\n\n%s\n", $1, $1, $2 >>last

+	printf "%s\n.Bp\n%s\n\n%s\n", h, $1, $2 >>last

 	close(last)

 }

 ' $*