diff options
-rw-r--r-- | ChangeLog | 6 | ||||
-rw-r--r-- | tmac/an-ext.tmac | 12 |
2 files changed, 12 insertions, 6 deletions
@@ -1,3 +1,9 @@ +2021-05-23 G. Branden Robinson <g.branden.robinson@gmail.com> + + * tmac/an-ext.tmac (UE, ME): Replace calls to HTML-NS macro for + emissions of HTML 'A' tags with direct usage of \X device + control escapes. + 2021-05-22 G. Branden Robinson <g.branden.robinson@gmail.com> * src/preproc/html/pre-html.cpp (main): Call `scanArguments()` diff --git a/tmac/an-ext.tmac b/tmac/an-ext.tmac index f8a6089e8..1a7abf0c7 100644 --- a/tmac/an-ext.tmac +++ b/tmac/an-ext.tmac @@ -114,15 +114,15 @@ . . \" Has there been one or more input lines for the link text? . ie \\n(dn \{\ -. do HTML-NS "<a href=""\\*(m1"">" +. nop \X^html:<a href="\\*(m1">^\c . \" Yes, strip off final newline of diversion and emit it. . do chop link-text-div . do link-text-div \c -. do HTML-NS </a> +. nop \X^html:</a>^\c . \} . el \ -. do HTML-NS "<a href=""\\*(m1"">\\*(m1</a>" +. nop \X^html:<a href="\\*(m1">\\*(m1</a>^\c \&\\$*\" . \} . el \{\ @@ -155,15 +155,15 @@ . . \" Has there been one or more input lines for the link text? . ie \\n(dn \{\ -. do HTML-NS "<a href=""mailto:\\*(m1"">" +. nop \X^html:<a href="mailto:\\*(m1">^\c . \" Yes, strip off final newline of diversion and emit it. . do chop link-text-div . do link-text-div \c -. do HTML-NS </a> +. nop \X^html:</a>^\c . \} . el \ -. do HTML-NS "<a href=""mailto:\\*(m1"">\\*(m1</a>" +. nop \X^html:<a href="mailto:\\*(m1">\\*(m1</a>^\c \&\\$*\" . \} . el \{\ |