summaryrefslogtreecommitdiff
path: root/tmac/an-ext.tmac
diff options
context:
space:
mode:
authorG. Branden Robinson <g.branden.robinson@gmail.com>2021-05-23 01:34:22 +1000
committerG. Branden Robinson <g.branden.robinson@gmail.com>2021-05-23 01:34:22 +1000
commitcd82f9aee11bb1d9d184072e3a0ffa01aab06f11 (patch)
tree38bf9aa15bbbbfd63ece118cd49d67b6f9dbae03 /tmac/an-ext.tmac
parent2672aa4d8ec48b56f4df4667bf4780cca8b4215e (diff)
downloadgroff-git-cd82f9aee11bb1d9d184072e3a0ffa01aab06f11.tar.gz
tmac/an-ext.tmac: Migrate from HTML-NS to \X.
* tmac/an-ext.tmac (UE, ME): Replace calls to HTML-NS macro (from www.tmac) for emission of HTML 'A' tags with direct usage of \X device control escapes.
Diffstat (limited to 'tmac/an-ext.tmac')
-rw-r--r--tmac/an-ext.tmac12
1 files changed, 6 insertions, 6 deletions
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 \{\