gbranden pushed a commit to branch master
in repository groff.

commit f396039f2818c48ea47f7686a7b65d3969d8f025
Author: G. Branden Robinson <[email protected]>
AuthorDate: Tue Jul 2 11:59:23 2024 -0500

    [mm]: Reduce padding after overlong item mark.
    
    * contrib/mm/m.tmac (LI): Reduce padding after overlong mark from 2n to
      1n.  This is more consistent with DWB mm behavior, though unspecified
      in the 3.3 manual.
    * contrib/mm/tests/VL-accommodates-overlong-mark.sh: Update test
      expectations.
---
 contrib/mm/ChangeLog                              | 8 ++++++++
 contrib/mm/m.tmac                                 | 2 +-
 contrib/mm/tests/VL-accommodates-overlong-mark.sh | 7 ++++---
 3 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/contrib/mm/ChangeLog b/contrib/mm/ChangeLog
index 919063399..a20a3e908 100644
--- a/contrib/mm/ChangeLog
+++ b/contrib/mm/ChangeLog
@@ -1,3 +1,11 @@
+2024-07-02  G. Branden Robinson <[email protected]>
+
+       * m.tmac (LI): Reduce padding after overlong mark from 2n to 1n.
+       This is more consistent with DWB mm behavior, though unspecified
+       in the 3.3 manual.
+       * tests/VL-accommodates-overlong-mark.sh: Update test
+       expectations.
+
 2024-07-02  G. Branden Robinson <[email protected]>
 
        * groff_mm.7.man (Macros) <ML>: Fix error; the default
diff --git a/contrib/mm/m.tmac b/contrib/mm/m.tmac
index bcac0719a..e650e44e2 100644
--- a/contrib/mm/m.tmac
+++ b/contrib/mm/m.tmac
@@ -2385,7 +2385,7 @@ ML, RL, VL, or LB first
 .\" determine where the text begins
 .if (\\n[li*type]>=0)&(\w'\\*[li*c-mark]'>\\n[li*tind]) \{\
 .      @warning \\$0: overlong mark '\\*[li*c-mark]'
-.      nr li*c-pad 2n \" force item/mark separation
+.      nr li*c-pad 1n \" force item/mark separation
 .\}
 .nr li*text-begin \\n[li*tind]>?\w@\\*[li*c-mark]@+\\n[li*c-pad]
 .\"
diff --git a/contrib/mm/tests/VL-accommodates-overlong-mark.sh 
b/contrib/mm/tests/VL-accommodates-overlong-mark.sh
index 921a51508..f4e50a7f3 100755
--- a/contrib/mm/tests/VL-accommodates-overlong-mark.sh
+++ b/contrib/mm/tests/VL-accommodates-overlong-mark.sh
@@ -22,7 +22,8 @@ groff="${abs_top_builddir:-.}/test-groff"
 
 # Regression-test Savannah #65843.
 
-input='.P
+input='.SA 0
+.P
 This is an
 .I mm
 document.
@@ -31,7 +32,7 @@ document.
 Item text.
 .LI foo
 Bar.
-.LI "oversized\ bazqux"
+.LI "oversized\ mark"
 This mark is oversized.
 But it should not overprint.
 .LE'
@@ -39,6 +40,6 @@ But it should not overprint.
 output=$(echo "$input" | "$groff" -mm -Tascii -P -cbou)
 echo "$output"
 echo "$output" \
-    | grep -q '^ *oversized bazqux  This mark is oversized\.'
+    | grep -q '^ *oversized mark This mark is oversized\.'
 
 # vim:set ai et sw=4 ts=4 tw=72:

_______________________________________________
Groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit

Reply via email to