Add tt, tb strings (top, bottom margin text)

Also, enable no-space mode after header.

1 files changed, 12 insertions, 5 deletions

diff --git a/g.tmac b/g.tmac
index 1df64ea..b2edca6 100644
--- a/g.tmac
+++ b/g.tmac
@@ -23,8 +23,10 @@
 .de _a
 .
 . \" configure initial options
-. _nr mt 1i \" margin top
-. _nr mb 1i \" margin bottom
+. _nr mt 1i \" top margin
+. _nr mb 1i \" bottom margin
+. _ds tt '''' \" text in top margin
+. _ds tb ''%'' \" text in bottom margin
 .
 . \" initialize document
 . wh 0 _ht
@@ -169,9 +171,10 @@
 .
 . \" print footer
 . _E _m
-. sp 2v
-. tl ''%''
+. sp \n(mbu-2v-24p
+. tl \*(tb
 . bp
+. ns
 .
 . \" print overflowed text on next page
 . _rest
@@ -180,7 +183,11 @@
 .\" _ht -- header trap
 .de _ht
 . _E _m
-' sp \n(mtu
+. rt 0
+. sp 24p
+. tl \*(tt
+. rt 0
+. sp \n(mtu
 ..
 .
 .\" _nt -- footnote trap