[groff] 43/46: [ms]: Clarify TH computation and diagnostic msg.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit fcb4ef5743435d6ebdbb662e5cf4d3c336f53901
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Wed Dec 7 01:24:39 2022 -0600

    [ms]: Clarify TH computation and diagnostic msg.
    
    * tmac/s.tmac (TH): Clarify computation and diagnostic message.
---
 ChangeLog   | 4 ++++
 tmac/s.tmac | 9 +++++++--
 2 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index c9b6246c3..c6ba50145 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2022-12-07  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * tmac/s.tmac (TH): Clarify computation and diagnostic message.
+
 2022-12-07  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        [tbl]: Fix Savannah #61878.
diff --git a/tmac/s.tmac b/tmac/s.tmac
index cc4a45d0e..54860d84d 100644
--- a/tmac/s.tmac
+++ b/tmac/s.tmac
@@ -2004,8 +2004,13 @@ along with this program.  If not, see 
<http://www.gnu.org/licenses/>.
 .      T#
 .      br
 .      di
-.      ie \\n[dn]+\\n[FM]+\\n[HM]+2v>=\\n[.p] \{\
-.              @error ridiculously long table header
+.      \" A table with repeating headings requires enough room for them
+.      \" and then at least one more vee for a row of data.
+.      ie \\n[dn]+1v>=(\\n[.p]-\\n[FM]-\\n[HM]) \{\
+.              ds tbl*err .TH repeating table heading(s) do not fit in
+.              as tbl*err " page area; formatting only once
+.              @error \\*[tbl*err]
+.              rm tbl*err
 .              ds@need \\n[dn]
 .              tbl*print-header
 .      \}