gbranden pushed a commit to branch master
in repository groff.
commit 52bde239e65dc90a43a67675e6d272b0e50e0492
Author: G. Branden Robinson <[email protected]>
AuthorDate: Mon Aug 11 13:40:49 2025 -0500
tmac/s.tmac: Trivially refactor (2/4).
* tmac/s.tmac ([initialization], tbl@top-hook, TH, TE, tbl@bottom-hook):
Rename register `tbl*have-header` to `tbl*has-heading`.
---
ChangeLog | 2 ++
tmac/s.tmac | 10 +++++-----
2 files changed, 7 insertions(+), 5 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index a95574081..9399de303 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -3,6 +3,8 @@
* tmac/s.tmac: Trivially refactor.
(@TS, tbl*print-header, TH, TE): Rename diversion
`tbl*header-div` to `tbl*heading-diversion`.
+ ([initialization], tbl@top-hook, TH, TE, tbl@bottom-hook):
+ Rename register `tbl*have-header` to `tbl*has-heading`.
2025-08-11 G. Branden Robinson <[email protected]>
diff --git a/tmac/s.tmac b/tmac/s.tmac
index 9f2e0d31d..cc0b15940 100644
--- a/tmac/s.tmac
+++ b/tmac/s.tmac
@@ -2004,7 +2004,7 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
.\" ****************************
.\" Tbl support.
.nr tbl@within-table 0
-.nr tbl*have-header 0
+.nr tbl*has-heading 0
.\" This gets called if TS occurs before the first paragraph.
.de TS
.LP
@@ -2029,7 +2029,7 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
.HTML-IMAGE
..
.de tbl@top-hook
-.if \\n[tbl*have-header] \{\
+.if \\n[tbl*has-heading] \{\
. ie \\n[.t]-\\n[tbl*header-ht]-1v .tbl*print-header
. el .sp \\n[.t]u
.\}
@@ -2060,7 +2060,7 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
. nr tbl*header-ht \\n[dn]
. ds@need \\n[dn]u+1v
. tbl*print-header
-. nr tbl*have-header 1
+. nr tbl*has-heading 1
. \}
.\}
.el .@error-recover .TH without .TS H
@@ -2073,7 +2073,7 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
.ie '\\n(.z'tbl*heading-diversion' \
. @error-recover .TS H but no .TH before .TE
.el \{\
-. nr tbl*have-header 0
+. nr tbl*has-heading 0
. if !'\*(.T'html' \{\
. sp \\n[DD]u
. ns
@@ -2087,7 +2087,7 @@ along with this program. If not, see
<http://www.gnu.org/licenses/>.
.nr tbl@within-table 0
..
.de tbl@bottom-hook
-.if \\n[tbl*have-header] \{\
+.if \\n[tbl*has-heading] \{\
. nr T. 1
. T#
.\}
_______________________________________________
groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit
