gbranden pushed a commit to branch master
in repository groff.

commit bed4c8f5112c2649f8ae12559519ba8592e84b80
Author: G. Branden Robinson <g.branden.robin...@gmail.com>
AuthorDate: Sun Jul 20 05:54:40 2025 -0500

    tmac/an.tmac: Refactor (1/2).
    
    * tmac/an.tmac (an*reset-section-parameters): Perform restoration of
      configured font family for body text here...
    
      (TH, SH, SS): ...instead of here.
---
 ChangeLog    | 7 +++++++
 tmac/an.tmac | 4 +---
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 93476b751..3ad5c2140 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2025-07-20  G. Branden Robinson <g.branden.robin...@gmail.com>
+
+       * tmac/an.tmac: Refactor.
+       (an*reset-section-parameters): Perform restoration of configured
+       font family for body text here...
+       (TH, SH, SS): ...instead of here.
+
 2025-07-23  G. Branden Robinson <g.branden.robin...@gmail.com>
 
        * tmac/tests/an_paragraph-reset-preserves-line-length.sh: Add
diff --git a/tmac/an.tmac b/tmac/an.tmac
index 7b87c8103..52ebb0ff0 100644
--- a/tmac/an.tmac
+++ b/tmac/an.tmac
@@ -140,6 +140,7 @@
 ..
 .
 .de an*reset-section-parameters
+.  fam \\*[an*body-family]
 .  nr an-inset-level 1
 .  nr an-margin \\n[BP]
 .  nr an-saved-margin!1 \\n[BP]
@@ -277,7 +278,6 @@
 .  nr an-was-tbl-failure-reported 0
 .
 .  an*reset-section-parameters
-.  fam \\*[an*body-family]
 .  ft R
 .  ps \\n[PS]u
 .  vs \\n[VS]u
@@ -696,7 +696,6 @@ contains unsupported escape sequence
 .\" if none) as a section heading.
 .de1 SH
 .  an*reset-section-parameters
-.  fam \\*[an*body-family]
 .  an*break-paragraph
 .  fi
 .  in \\n[BP]u
@@ -725,7 +724,6 @@ contains unsupported escape sequence
 .\" if none) as a subsection heading.
 .de1 SS
 .  an*reset-section-parameters
-.  fam \\*[an*body-family]
 .  an*break-paragraph
 .  fi
 .  in \\n[BP]u

_______________________________________________
groff-commit mailing list
groff-commit@gnu.org
https://lists.gnu.org/mailman/listinfo/groff-commit

Reply via email to