Commit9e66243

committed

Fixes to pgcvslog for last narrive entry.

1 parent8ac6d95 commit9e66243Copy full SHA for 9e66243

File tree

+34

-3

lines changed

+34

-3

lines changed

Lines changed: 34 additions & 3 deletions

Original file line number	Diff line number	Diff line change
`@@ -147,9 +147,40 @@ awk ' BEGIN { slot = 0; oldslot=0; save_working = ""; html="'"$HTML"'"}`
`147`	`147`	`}`
`148`	`148`	`}`
`149`	`149`	`END{`
`150`		`-# dump out the last filename`
	`150`	`+# If there are a different number of narrative`
	`151`	`+# lines, they can not possibly be the same.`
	`152`	`+if (slot != oldslot)`
	`153`	`+same = "N";`
	`154`	`+else`
	`155`	`+{`
	`156`	`+same = "Y";`
	`157`	`+for (i=1; i <= slot; i++)`
	`158`	`+{`
	`159`	`+if (oldnarr[i] != narr[i])`
	`160`	`+{`
	`161`	`+same = "N";`
	`162`	`+break;`
	`163`	`+}`
	`164`	`+}`
	`165`	`+}`
`151`	`166`
	`167`	`+# dump out the old narrative if it is new`
	`168`	`+if (same == "N")`
	`169`	`+{`
	`170`	`+if (oldslot)`
	`171`	`+for (i=1; i <= oldslot; i++)`
	`172`	`+{`
	`173`	`+print oldnarr[i];`
	`174`	`+if (html == "Y" &&`
	`175`	`+ oldnarr[i] != "<HR>" &&`
	`176`	`+ oldnarr[i] !~ "^<DIV ")`
	`177`	`+print "<BR>";`
	`178`	`+}`
	`179`	`+}`
	`180`	`+`
	`181`	`+# dump out the last filename`
`152`	`182`	`print save_working;`
	`183`	`+`
`153`	`184`	`if (html == "Y")`
`154`	`185`	`print "<BR>";`
`155`	`186`
`@@ -158,8 +189,8 @@ awk ' BEGIN { slot = 0; oldslot=0; save_working = ""; html="'"$HTML"'"}`
`158`	`189`	`{`
`159`	`190`	`print narr[i];`
`160`	`191`	`if (html == "Y" &&`
`161`		`-oldnarr[i] != "<HR>" &&`
`162`		`-oldnarr[i] !~ "^<DIV ")`
	`192`	`+narr[i] != "<HR>" &&`
	`193`	`+narr[i] !~ "^<DIV ")`
`163`	`194`	`print "<BR>";`
`164`	`195`	`}`
`165`	`196`	`}' \|`

Comments

(0)