gbranden pushed a commit to branch master
in repository groff.
commit 043fe084ce1533d2d005d19aab054c96e93277dc
Author: G. Branden Robinson <g.branden.robin...@gmail.com>
AuthorDate: Sun Aug 3 05:35:59 2025 -0500
[mm]: Fine-tune memorandum type 0 layout.
* contrib/mm/mm/0.MT: Let right-most column of document heading stretch
to the configured text width (the `W` register), but only if it is
defined and greater than the default.
---
contrib/mm/ChangeLog | 6 ++++++
contrib/mm/mm/0.MT | 8 ++++++--
2 files changed, 12 insertions(+), 2 deletions(-)
diff --git a/contrib/mm/ChangeLog b/contrib/mm/ChangeLog
index 1b6e4a441..ba6d7317e 100644
--- a/contrib/mm/ChangeLog
+++ b/contrib/mm/ChangeLog
@@ -1,3 +1,9 @@
+2025-08-03 G. Branden Robinson <g.branden.robin...@gmail.com>
+
+ * mm/0.MT: Let right-most column of document heading stretch to
+ the configured text width (the `W` register), but only if it is
+ defined and greater than the default.
+
2025-08-03 G. Branden Robinson <g.branden.robin...@gmail.com>
* mm/0.MT:
diff --git a/contrib/mm/mm/0.MT b/contrib/mm/mm/0.MT
index 321122806..2b5d5240b 100644
--- a/contrib/mm/mm/0.MT
+++ b/contrib/mm/mm/0.MT
@@ -38,14 +38,18 @@ http://savannah.gnu.org/bugs/?group=groff.
. nr cov*column2-limit 4i
. nr cov*column3-hpos 4.3i \" "date", "from"
. nr cov*column4-hpos 4.65i \" date, author names, TM number
-. nr cov*column4-limit 6i
+. nr cov*user-width 0
+. if r W .nr cov*user-width \n[W]u
+. nr cov*column4-limit (6i>?\n[cov*user-width]u)
.\}
.el \{\
. nr cov*column2-hpos 9n
. nr cov*column2-limit 37n
. nr cov*column3-hpos 39n
. nr cov*column4-hpos 45n
-. nr cov*column4-limit 60n
+. nr cov*user-width 0
+. if r W .nr cov*user-width \n[W]u
+. nr cov*column4-limit (60n>?\n[cov*user-width]u)
.\}
.\"------------
.de cov@print-title
_______________________________________________
groff-commit mailing list
groff-commit@gnu.org
https://lists.gnu.org/mailman/listinfo/groff-commit
