[groff] 07/15: [mm]: Make `R` macro work like `B` and `I`.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit cabf909a435ae1f4a18e5435000a6e9e8a263945
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Thu Aug 12 03:25:48 2021 +1000

    [mm]: Make `R` macro work like `B` and `I`.
    
    * contrib/mm/m.tmac (R): Alter to work analogously to `B` and `I`
      macros; accept multiple arguments if given, and alternate roman with
      previous font.  Stop explicitly turning off underlining.
    * NEWS: Add item.
---
 NEWS                 | 3 +++
 contrib/mm/ChangeLog | 6 ++++++
 contrib/mm/m.tmac    | 4 ++--
 3 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/NEWS b/NEWS
index 57a3219..9dbb039 100644
--- a/NEWS
+++ b/NEWS
@@ -171,6 +171,9 @@ o The m (mm) and s (ms) macro packages no longer manipulate 
the warning
   arguments in your document or pass "-w w" to groff (see troff(1) or
   the groff Texinfo manual for more on warnings).
 
+o The m (mm) and s (ms) macro packages' "R" macros now work analogously
+  to their "B" and "I" macros instead of ignoring their arguments.
+
 o The s (ms) macro package supports a new string, FR, which defines the
   ratio of the footnote line length to the current line length.  The
   default expression is "11/12", 11/12ths of the normal line length,
diff --git a/contrib/mm/ChangeLog b/contrib/mm/ChangeLog
index da0d40d..2038775 100644
--- a/contrib/mm/ChangeLog
+++ b/contrib/mm/ChangeLog
@@ -1,3 +1,9 @@
+2021-08-12  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * m.tmac (R): Alter to work analogously to `B` and `I` macros;
+       accept multiple arguments if given, and alternate roman with
+       previous font.  Stop explicitly turning off underlining.
+
 2021-07-17  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        Refactor author title handling.
diff --git a/contrib/mm/m.tmac b/contrib/mm/m.tmac
index acbe75c..1ff7f17 100644
--- a/contrib/mm/m.tmac
+++ b/contrib/mm/m.tmac
@@ -2752,8 +2752,8 @@ in=\\n[.i] fi=\\n[.u] .d=\\n[.d] nl=\\n[nl] pg=\\n[%]
 .el .ft 2
 ..
 .de R
-.ft 1
-.ul 0
+.ie \\n[.$] .fnt@switch \f1 \f[\\n[.f]] \\$@
+.el .ft 1
 ..
 .de IB
 .if \\n[.$] .fnt@switch \f2 \f3 \\$@