[groff] 11/15: tmac/an.tmac (TP): Refactor.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 12274bfff8473a5c9a88be8e04bccece17378dfb
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Thu Feb 1 18:36:56 2024 -0600

    tmac/an.tmac (TP): Refactor.
    
    * tmac/an.tmac (TP): Don't set up an input trap if we're bailing out of
      the macro due to invalid nesting.
---
 ChangeLog    | 5 +++++
 tmac/an.tmac | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 9ec620251..49063f8b5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2024-02-01  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * tmac/an.tmac (TP): Don't set up an input trap if we're bailing
+       out of the macro due to invalid nesting.
+
 2024-02-01  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        * tmac/an.tmac: Refactor to distinguish visible hyperlinks from
diff --git a/tmac/an.tmac b/tmac/an.tmac
index a6e9f26ca..2540ff5e1 100644
--- a/tmac/an.tmac
+++ b/tmac/an.tmac
@@ -814,11 +814,11 @@ contains unsupported escape sequence
 .de1 TP
 .  an-break-paragraph
 .  if \\n[.$] .nr an-prevailing-indent (n;\\$1)
-.  itc 1 an-input-trap
 .  if \\n[an*is-in-paragraph-tag-diversion] \{\
 .    an-warn cannot nest .\\$0 or .TQ inside .\\$0; supply a tag
 .    return
 .  \}
+.  itc 1 an-input-trap
 .  in 0
 .  ll -\\n[an-margin]u
 .  nr an*is-in-paragraph-tag-diversion 1