[groff] 08/14: [man]: Refactor diversion management (3/7).

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 49113021103bfbdf3747c9440a657b883ce66626
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Mon Jan 29 15:56:25 2024 -0600

    [man]: Refactor diversion management (3/7).
    
    * tmac/an.tmac (an*begin-hyperlink, an*end-hyperlink): Rename
      `an*link-text-div` to `an*link-text`.
---
 ChangeLog    | 2 ++
 tmac/an.tmac | 6 +++---
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index a966887bc..4e165201b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -7,6 +7,8 @@
        `an*is-in-paragraph-tag-diversion`.
        (an-write-paragraph-tag, TP): Rename `an-div` diversion to
        `an*paragraph-tag`.
+       (an*begin-hyperlink, an*end-hyperlink): Rename
+       `an*link-text-div` to `an*link-text`.
 
 2024-01-28  G. Branden Robinson <g.branden.robinson@gmail.com>
 
diff --git a/tmac/an.tmac b/tmac/an.tmac
index 71915473c..287040929 100644
--- a/tmac/an.tmac
+++ b/tmac/an.tmac
@@ -1124,7 +1124,7 @@ contains unsupported escape sequence
 .    \" Start diversion in a new environment.
 .    ev an*link-text-env
 .    if '\*[.T]'pdf' \&\m[\\*[PDFHREF.TEXT.COLOUR]]\c
-.    di an*link-text-div
+.    di an*link-text
 .    ll (\\n[an*saved-line-length]u - \\n[an*saved-indentation]u)
 .  \}
 .  rr an*saved-indentation
@@ -1153,8 +1153,8 @@ contains unsupported escape sequence
 .      if \\n[an*is-output-terminal] \
 .        nop \X^tty: link \\*[an*prefix]\\*[an*hyperlink]^\c
 .      \" Strip off the final newline of the diversion and emit it.
-.      chop an*link-text-div
-.      an*link-text-div
+.      chop an*link-text
+.      an*link-text
 \c\" XXX: If we .nop this, HTML output is corrupted (Savannah #63470).
 .      if '\*[.T]'html' \
 .        nop \X^html:</a>^\c