[groff] 10/30: src/utils/grog/grog.pl: Update macro lists.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 128da96068943176ba1293de9a86c5e9fb269204
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Tue Mar 26 21:37:47 2024 -0500

    src/utils/grog/grog.pl: Update macro lists.
    
    * src/utils/grog/grog.pl (do_line): Update lists of characteristic
      package macros: for mm, add list management macros, unnumbered header
      macro, and `EPIC`; for man(7), drop `MT` (it is also an mm macro) and
      add `MR`, from groff 1.23.0 and plan9port.  Also discard closing brace
      escape sequence as not a legitimate macro name.
---
 ChangeLog              | 7 ++++++-
 src/utils/grog/grog.pl | 9 ++++++++-
 2 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 1217baab0..dce8b81a3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,7 +1,12 @@
 2024-03-26  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        * src/utils/grog/grog.pl (do_line): Recognize new requests in
-       forthcoming groff 1.24 release.
+       forthcoming groff 1.24 release.  Update lists of characteristic
+       package macros: for mm, add list management macros (except for
+       `LI`, made ambiguous by groff_www(7)), unnumbered header macro,
+       and `EPIC`; for man(7), drop `MT` (it is also an mm macro) and
+       add `MR`, from groff 1.23.0 and plan9port.  Also discard closing
+       brace escape sequence as not a legitimate macro name.
 
 2024-03-24  G. Branden Robinson <g.branden.robinson@gmail.com>
 
diff --git a/src/utils/grog/grog.pl b/src/utils/grog/grog.pl
index 6f162df21..61bfd102a 100644
--- a/src/utils/grog/grog.pl
+++ b/src/utils/grog/grog.pl
@@ -339,6 +339,7 @@ sub do_line {
   # Ignore all other requests.  Again, macro names can contain Perl
   # regex metacharacters, so be careful.
   return if (grep(/^\Q$command\E$/, @request));
+  return if ($command eq '\}'); # *roff closing brace escape sequence
   # What remains must be a macro name.
   my $macro = $command;
 
@@ -389,8 +390,14 @@ sub do_line {
   #############
   # mm and mmse
 
+  # `LI` is unique to mm among full-service macro packages, but www.tmac
+  # muddies the waters, so omit it.
   if ($macro =~ /^(
+                  AL|BL|BVL|DL|ML|RL|VL|
+                  EPIC|
                   H|
+                  HU|
+                  LB|LE
                   MULB|
                   LO|
                   LT|
@@ -506,7 +513,7 @@ sub infer_man_or_ms_package {
                   'SB',
                   'EE', 'EX',
                   'OP',
-                  'MT', 'ME', 'SY', 'YS', 'TQ', 'UR', 'UE');
+                  'ME', 'SY', 'YS', 'TQ', 'UR', 'UE', 'MR');
 
   my @macro_man_or_ms = ('B', 'I', 'BI',
                         'DT',