[groff] 07/26: tmac/an.tmac: Relocate `an-break-body-text` trap.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 6809861d6bbd1fb959af799a9899f45aad1c1f98
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Thu Dec 15 18:37:57 2022 -0600

    tmac/an.tmac: Relocate `an-break-body-text` trap.
    
    * tmac/an.tmac (TH): Relocate `an-break-body-text` trap to be one
      half-inch above footer (instead of twice the footer distance).  I
      reason that anyone who customizes `FT` is doing so to overprint some
      kind of material at the bottoms of pages, or simply to make the margin
      larger.  (One then wonders why we don't have an `HD` register for the
      top.)
    
    * tmac/groff_man.7.man.in (Options) <FT>: Document this.
---
 ChangeLog               | 11 +++++++++++
 tmac/an.tmac            |  3 ++-
 tmac/groff_man.7.man.in |  2 +-
 3 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index c980ded8a..325fdce1a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,14 @@
+2022-12-15  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * tmac/an.tmac (TH): Relocate `an-break-body-text` trap to be
+       one half-inch above footer (instead of twice the footer
+       distance).  I reason that anyone who customizes `FT` is doing so
+       to overprint some kind of material at the bottoms of pages, or
+       simply to make the margin larger.  (One then wonders why we
+       don't have an `HD` register for the top.)  Also remove register
+       when done with it.
+       * tmac/groff_man.7.man.in (Options) <FT>: Document this.
+
 2022-12-15  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        * tmac/an.tmac (TH): Trivially refactor.  Rename
diff --git a/tmac/an.tmac b/tmac/an.tmac
index 88d11e9b3..9d9202cd6 100644
--- a/tmac/an.tmac
+++ b/tmac/an.tmac
@@ -357,7 +357,8 @@
 .    ie r FT .nr an*footer-location \\n[FT]
 .    el      .nr an*footer-location (-.5i)
 .    wh \\n[an*footer-location]u an-footer
-.    wh (2u * \\n[an-footer-location]u) an-break-body-text
+.    wh (\\n[an*footer-location]u - .5i) an-break-body-text
+.    rr an*footer-location
 .    \}
 .  \}
 .
diff --git a/tmac/groff_man.7.man.in b/tmac/groff_man.7.man.in
index 6c3341c08..1986c80a8 100644
--- a/tmac/groff_man.7.man.in
+++ b/tmac/groff_man.7.man.in
@@ -3312,7 +3312,7 @@ Set distance of the footer relative to the bottom of the 
page to
 .I footer-distance;
 this amount is always negative.
 .
-At twice this distance,
+At one half-inch above this location,
 the page text is broken before writing the footer.
 .
 Ignored if continuous rendering is enabled.