[Info-vax] Removing blank lines from text files

[Bob]

For now, I'm using this simple script:

$ open /read old 'p1
$ open /write new 'p1
$loop:
$ read /end=exit /error=exit old line
$ if f$edit (line, "collapse") .eqs. "" then goto loop
$ write new line
$ goto loop
$exit:
$ close new
$ close old
$ exit