[groff] 07/12: tmac/an-ext.tmac: Work around Savannah #59522.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 3a919166a22b6e43018c22a944cf8bde39db8403
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Thu May 6 14:31:24 2021 +1000

    tmac/an-ext.tmac: Work around Savannah #59522.
    
    * tmac/an-ext.tmac (EX): Work around Savannah #59522 by changing fonts
      differently on DVI output, avoiding a font warning.
---
 ChangeLog        | 5 +++++
 tmac/an-ext.tmac | 9 +++++++--
 2 files changed, 12 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index c18c255..3ea2058 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2021-05-06  G. Branden Robinson <g.branden.robinson@gmail.com>
 
+       * tmac/an-ext.tmac (EX): Work around Savannah #59522 by changing
+       fonts differently on DVI output, avoiding a font warning.
+
+2021-05-06  G. Branden Robinson <g.branden.robinson@gmail.com>
+
        * tmac/an-ext.tmac: If in nroff mode, remap font CBI to BI.
        * tmac/dvi.tmac: Remap font CBI to CWI.  (Computer Modern
        Constant Width has no bold styles).
diff --git a/tmac/an-ext.tmac b/tmac/an-ext.tmac
index 514be3f..ff9c782 100644
--- a/tmac/an-ext.tmac
+++ b/tmac/an-ext.tmac
@@ -192,8 +192,13 @@
 .  nr PD 1v
 .  nf
 .  nh
-.  do fam C
-.  ft R
+.  \" Work around Savannah #59522.
+.  ie !'\\*[.T]'dvi' \{\
+.    do fam C
+.    ft R
+.  \}
+.  el \
+.    ft CW
 ..
 .
 .