From 137c5ab18d8447945b8997e6ddfe4dc80a6680b4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Sun, 20 Jun 2021 00:36:41 +0200
Subject: Add tt, tb strings (top, bottom margin text)

Also, enable no-space mode after header.
---
 g.tmac | 17 ++++++++++++-----
 1 file 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
-- 
cgit v1.2.3