[groff] 46/50: [mm]: Use `EM` string as `DL` list item mark.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit 6a4e2e5cecc4a7ef24e3bf6bfe839d7fdade24b6
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Thu Jul 4 20:01:14 2024 -0500

    [mm]: Use `EM` string as `DL` list item mark.
    
    * contrib/mm/m.tmac (DL): Use the `EM` string as the mark instead of an
      em dash special character literal.
    
    * contrib/mm/groff_mm.7.man (Macros) <DL>:
      (Strings) <EM>:
    * NEWS: Document this.
---
 NEWS                      | 4 ++++
 contrib/mm/ChangeLog      | 8 ++++++++
 contrib/mm/groff_mm.7.man | 9 ++++++---
 contrib/mm/m.tmac         | 8 ++++----
 4 files changed, 22 insertions(+), 7 deletions(-)

diff --git a/NEWS b/NEWS
index f9e7db006..941c80523 100644
--- a/NEWS
+++ b/NEWS
@@ -334,6 +334,10 @@ o The m (mm) macro package's `BVL` and `VL` macros' first 
arguments are
   now optional.  If omitted, the paragraph indentation amount (register
   `Pi`) is used for list items' text indentations.
 
+o The m (mm) macro package's `DL` macro now uses the `EM` string as the
+  mark instead of an em dash special character literal.  (The latter
+  remains the the default definition of the `EM` string.)
+
 o The m (mm) macro package's `DS` macro now interprets its third
   argument (a right-hand indentation) in ens by default, for consistency
   with the rest of the package.  This is a difference from DWB mm (which
diff --git a/contrib/mm/ChangeLog b/contrib/mm/ChangeLog
index 70969c7d0..31a75ac2e 100644
--- a/contrib/mm/ChangeLog
+++ b/contrib/mm/ChangeLog
@@ -1,3 +1,11 @@
+2024-07-04  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       * m.tmac (DL): Use the `EM` string as the mark instead of an em
+       dash special character literal.
+
+       * groff_mm.7.man (Macros) <DL>:
+       (Strings) <EM>: Document this.
+
 2024-07-04  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        * tests/lists-indent-correctly.sh: Add unit test.
diff --git a/contrib/mm/groff_mm.7.man b/contrib/mm/groff_mm.7.man
index bb0af2fdd..4869d13db 100644
--- a/contrib/mm/groff_mm.7.man
+++ b/contrib/mm/groff_mm.7.man
@@ -1245,7 +1245,9 @@ and
 .BR 1 ]]
 Begin dashed list.
 .
-Items are prefixed with an em dash and a space.
+.I mm
+marks each item with the em-dash string
+.BR EM .
 .
 A
 .I text-indent
@@ -4160,8 +4162,9 @@ and register
 .
 .TP
 .B EM
-interpolates \(em,
-an em dash.
+interpolates an em dash mark in
+.B DL
+lists.
 .
 .
 .TP
diff --git a/contrib/mm/m.tmac b/contrib/mm/m.tmac
index ca10801ef..c205be6c3 100644
--- a/contrib/mm/m.tmac
+++ b/contrib/mm/m.tmac
@@ -2540,11 +2540,11 @@ exceeds depth of nested lists (\\n[li*lvl])
 .de DL
 .if \\n[D]>2 .tm \\$0: \\$@
 .if \\n[.$]>2 .@warning \\$0: ignoring excess arguments
-.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \[em]
-.if \\n[.$]=1 .LB 0\\$1   0 1 0 \[em]
+.if \\n[.$]<1 .LB \\n[Pi] 0 1 0 \*[EM]
+.if \\n[.$]=1 .LB 0\\$1   0 1 0 \*[EM]
 .if \\n[.$]=2 \{\
-.      ie '\\$1'' .LB \\n[Pi] 0 1 0 \[em] 0 1
-.      el         .LB 0\\$1   0 1 0 \[em] 0 1
+.      ie '\\$1'' .LB \\n[Pi] 0 1 0 \*[EM] 0 1
+.      el         .LB 0\\$1   0 1 0 \*[EM] 0 1
 .\}
 ..
 .\" List type `ML` uses an argument for the mark measures it to