[groff] 13/49: tmac/devtag.tmac: Work in compatibility mode.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit c31cf67b73d98b9ae96d6408233905723b5406d8
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Wed Jun 16 23:09:24 2021 +1000

    tmac/devtag.tmac: Work in compatibility mode.
    
    * tmac/devtag.tmac: Work in compatibility mode; define macros with the
      `de1` instead of the `de` request.
---
 ChangeLog        |  5 +++++
 tmac/devtag.tmac | 16 ++++++++--------
 2 files changed, 13 insertions(+), 8 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 5184519..051130a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2021-06-16  G. Branden Robinson <g.branden.robinson@gmail.com>
 
+       * tmac/devtag.tmac: Work in compatibility mode; define macros
+       with the `de1` instead of the `de` request.
+
+2021-06-16  G. Branden Robinson <g.branden.robinson@gmail.com>
+
        * tmac/refer-me.tmac:
        * tmac/refer.tmac: Add include guards.
 
diff --git a/tmac/devtag.tmac b/tmac/devtag.tmac
index 6e2ce16..fa2b010 100644
--- a/tmac/devtag.tmac
+++ b/tmac/devtag.tmac
@@ -49,7 +49,7 @@ are reasonably generic and could be applied to other devices.
 .\"
 .\"   Emit a tag <name>
 .\"
-.de DEVTAG
+.de1 DEVTAG
 .  tag devtag:\\$*
 ..
 .\" --------------------------------------------------------------------
@@ -57,7 +57,7 @@ are reasonably generic and could be applied to other devices.
 .\"
 .\"   When the troff state changes, emit tag <name>
 .\"
-.de DEVTAG-NEXT
+.de1 DEVTAG-NEXT
 .  taga devtag:\\$*
 ..
 .
@@ -68,7 +68,7 @@ are reasonably generic and could be applied to other devices.
 .\"       Takes a single parameter <level>. <level> 1
 .\"       is the outer most level.
 .
-.de DEVTAG-NH
+.de1 DEVTAG-NH
 .   DEVTAG ".NH \\$1"
 ..
 .als DEVTAG-SH DEVTAG-NH
@@ -78,7 +78,7 @@ are reasonably generic and could be applied to other devices.
 .\"     indicate that the following text is aligned for the column <n>
 .\"     n: [1..MAX(n)]
 .
-.de DEVTAG-COL
+.de1 DEVTAG-COL
 .   DEVTAG ".col \\$1"
 ..
 .
@@ -86,21 +86,21 @@ are reasonably generic and could be applied to other 
devices.
 .\"  EO-H
 .\"     indicate that a header has finished.
 .
-.de DEVTAG-EO-H
+.de1 DEVTAG-EO-H
 .   DEVTAG ".eo.h"
 ..
 .\" --------------------------------------------------------------------
 .\"  EO-TL
 .\"     indicate that a title has finished.
 .
-.de DEVTAG-EO-TL
+.de1 DEVTAG-EO-TL
 .   DEVTAG ".eo.tl"
 ..
 .\" --------------------------------------------------------------------
 .\"  TL
 .\"     indicate that the following text forms a title.
 .
-.de DEVTAG-TL
+.de1 DEVTAG-TL
 .   DEVTAG ".tl"
 ..
 .
@@ -108,7 +108,7 @@ are reasonably generic and could be applied to other 
devices.
 .\"  COL-NEXT <n>
 .\"     emit a column tag just before the next glyph.
 .
-.de DEVTAG-COL-NEXT
+.de1 DEVTAG-COL-NEXT
 .   DEVTAG-NEXT ".col \\$1"
 ..
 .