diff options
-rwxr-xr-x | re | 5 | ||||
-rw-r--r-- | re.tmac | 2 |
2 files changed, 5 insertions, 2 deletions
@@ -111,8 +111,11 @@ while (<$fh>) { while ($_ = readline $handles{$file}) { $bytes += length($_); last if $end and $bytes > $end; + /^(\s+)/; my $indent = $1; + s/(.{60})(.)/$1\\fR...\\fP\n$indent\t$2/g; s/\\/\\\\/g; - s/^\./\\&./; + s/\\\\fR...\\\\fP/\\fR...\\fP/g; + s/^\./\\&./m; print; } @@ -6,7 +6,7 @@ . if !(\nz = 1) .if (\np > 0) .if (\n% > \np) .sp -(\nbu - \ncu - 1.5v) . nf . ft C -. ps -1p +. ps -2p . vs -1p . ta 8n +8n +8n +8n +8n . in 2.2i |