aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Ankarström <john@ankarstrom.se>2021-06-20 08:57:28 +0200
committerJohn Ankarström <john@ankarstrom.se>2021-06-20 09:46:59 +0200
commit35567d1ef4f1d0721f298865132174858b15ae75 (patch)
tree17b5e0af4f45f3ef16f26b0eaef7f4808ab8f119
parent1419e33327a243e6df5cc80e3d07cfd2529957b9 (diff)
downloadmk-35567d1ef4f1d0721f298865132174858b15ae75.tar.gz
Have c copy relative font size instead of absolute from l
This is done by calculating the difference between the l environment's font size and that of the 0 environment.
-rw-r--r--g.tmac7
1 files changed, 5 insertions, 2 deletions
diff --git a/g.tmac b/g.tmac
index 2a01390..7a2f290 100644
--- a/g.tmac
+++ b/g.tmac
@@ -224,7 +224,10 @@ ___________________
.\" c -- constant-width font
.de c
.
-. \" copy family and point size from l environment
+. \" copy family and (relative) point size from l environment
+. _E 0
+. nr _S \n(.s
+. _E
. _E l
. ds _fam \n[.fam]
. nr _s \n(.s
@@ -232,7 +235,7 @@ ___________________
.
\&\$3\c
. fam \*[_fam]
-. ps \n(_s
+. ps +(\n(_s-\n(_S)u
\&\$1\c
. fam
. ps