[groff] 02/07: tmac/an-old.tmac: Refactor DT and PD.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 69863462003ed26b8da81ab174b0a6c0a7d26eea
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Thu May 20 10:28:26 2021 +1000

    tmac/an-old.tmac: Refactor DT and PD.
    
    * tmac/an-old.tmac: Refactor to move bodies of DT and PD into private
      macros.
    
      (an-reset-tab-stops, an-reset-paragraphp-spacing): New names for the
      former DT and PT.
    
      (TH): Call these new macro names.
    
      (DT, PD): Wrap the corresponding private macros.
---
 ChangeLog        |  9 +++++++++
 tmac/an-old.tmac | 18 +++++++++++++-----
 2 files changed, 22 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index b3b3996..7b2998d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,14 @@
 2021-05-20  G. Branden Robinson <g.branden.robinson@gmail.com>
 
+       * tmac/an-old.tmac: Refactor to move bodies of DT and PD into
+       private macros.
+       (an-reset-tab-stops, an-reset-paragraphp-spacing): New names for
+       the former DT and PT.
+       (TH): Call these new macro names.
+       (DT, PD): Wrap the corresponding private macros.
+
+2021-05-20  G. Branden Robinson <g.branden.robinson@gmail.com>
+
        * tmac/an-old.tmac (an-bp): In continuous rendering mode, draw
        a horizontal line between a page footer of one man page document
        and the heading of the next, but only if multiple documents are
diff --git a/tmac/an-old.tmac b/tmac/an-old.tmac
index 8f28c7a..40d4403 100644
--- a/tmac/an-old.tmac
+++ b/tmac/an-old.tmac
@@ -107,6 +107,15 @@
 .  em an-end
 ..
 .
+.de an-reset-tab-stops
+.  ta T .5i
+..
+.
+.de an-reset-paragraph-spacing
+.  ie \\n[.$] .nr PD (v;\\$1)
+.  el         .nr PD (.4v >? \n[.V])
+..
+.
 .de an-reset-margin-and-inset-level
 .  nr an-inset-level 1
 .  nr an-margin \\n[IN]
@@ -176,8 +185,8 @@
 .  ll \\n[LL]u
 .  ss 12
 .
-.  DT
-.  PD
+.  an-reset-tab-stops
+.  an-reset-paragraph-spacing
 .  an-reset-margin-and-inset-level
 .
 .  nr an-tag-separation 1n
@@ -264,12 +273,11 @@
 ..
 .
 .de1 DT
-.  ta T .5i \" This sets tabs every .5 inches
+.  an-reset-tab-stops
 ..
 .
 .de1 PD
-.  ie \\n[.$] .nr PD (v;\\$1)
-.  el         .nr PD (.4v >? \n[.V])
+\\*[an-reset-paragraph-spacing]\\
 ..
 .
 .\" Redefine these to customize the header & footer