gbranden pushed a commit to branch master
in repository groff.
commit 11af3d67f9f9bdefd1592cea88c3eb53e9437337
Author: G. Branden Robinson <[email protected]>
AuthorDate: Fri Jun 14 13:08:39 2024 -0500
[mm]: Fix code style nits.
* contrib/mm/m.tmac (LI): Rename `li*in` to `li*mark-begin`, to parallel
existing `li*text-begin`. Use `nop` for clarity. Remove registers
and strings that are no longer needed at the end of the macro
definition.
---
contrib/mm/ChangeLog | 7 +++++++
contrib/mm/m.tmac | 11 +++++++----
2 files changed, 14 insertions(+), 4 deletions(-)
diff --git a/contrib/mm/ChangeLog b/contrib/mm/ChangeLog
index 278ab2103..e7a177453 100644
--- a/contrib/mm/ChangeLog
+++ b/contrib/mm/ChangeLog
@@ -1,3 +1,10 @@
+2024-06-14 G. Branden Robinson <[email protected]>
+
+ * m.tmac (LI): Fix code style nits. Rename `li*in` to
+ `li*mark-begin`, to parallel existing `li*text-begin`. Use
+ `nop` for clarity. Remove registers and strings that are no
+ longer needed at the end of the macro definition.
+
2024-06-14 G. Branden Robinson <[email protected]>
* m.tmac (LI): Fix Savannah #65843. Introduce list-item-local
diff --git a/contrib/mm/m.tmac b/contrib/mm/m.tmac
index 9f2852d6f..a84f30d90 100644
--- a/contrib/mm/m.tmac
+++ b/contrib/mm/m.tmac
@@ -2311,7 +2311,7 @@ ML, RL, VL, or LB first
. SP (u;\\n[li*li-spc]*\\n[Lsp])
.ne 2v
.\"
-.ds li*c-mark \\*[li*mark]
+.ds li*c-mark \\*[li*mark] \" mark specific to this item's context
.nr li*cnt!\\n[li*lvl] +1
.if \\n[li*type]=1 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]].
.if \\n[li*type]=2 .ds li*c-mark \\n[li*cnt!\\n[li*lvl]])
@@ -2335,15 +2335,18 @@ ML, RL, VL, or LB first
.\"
.\" determine where the mark begin
.ie !\\n[li*c-pad] .nr li*mark-begin \\n[li*mind]
-.el .nr li*in \\n[li*text-begin]-\\n[li*c-pad]-\w@\\*[li*c-mark]@
-.if !\\n[li*in] .nr li*in 0
+.el .nr li*mark-begin \\n[li*text-begin]-\\n[li*c-pad]-\w@\\*[li*c-mark]@
+.if !\\n[li*mark-begin] .nr li*mark-begin 0
.\"
.ti -\\n[li*tind]u
.\" no indentation if hanging indent
.if (\w@\\*[li*c-mark]@=0)&((\\n[.$]=0):(\w@\\$1@=0)) .nr li*text-begin 0
-\Z'\&\h'\\n[li*in]u'\\*[li*c-mark]'\h'\\n[li*text-begin]u'\&\c
+.nop \Z@\&\h'\\n[li*mark-begin]u'\\*[li*c-mark]@\h'\\n[li*text-begin]u'\&\c
.if \\n[li*type]=-1 .br
.rr li*c-pad
+.rr li*mark-begin
+.rr li*text-begin
+.rm li*c-mark
..
.\"
.\"-------------
_______________________________________________
Groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit
