Werner Lemberg:
> > May I suggest a patch that will fix the format
> > of the header number in references?
>
> Please do!
OK, it is attached.
--
() ascii ribbon campaign - against html e-mail
/\ www.asciiribbon.org - against proprietary attachments
--- m-orig.tmac 2012-08-02 20:06:16.773907400 +0400
+++ m.tmac 2012-08-02 20:13:49.146429200 +0400
@@ -1003,6 +1003,7 @@
.\" special case, no dot after level one heading if not H1dot true
.if (\\n[hd*level]=1)&(\\n[H1dot]=0) .ds hd*mark \\n[H1]
.\"
+.ds hd-mark-trimmed \\*[hd*mark]\" save hd-mark w/o spaces for references
.as hd*mark \ \ \" add spaces between mark and heading
.if !\\n[hd*arg1] .ds hd*mark\" no mark for unnumbered
.\"
@@ -3123,14 +3124,14 @@
.if !r qrf*pass .tm "SETR: No .INITR in this file"
.if \\n[Ref] \{\
. ds qrf*name qrf*ref-\\$1
-. if \\n[D]>2 .tm SETR: ref \\*[qrf*name]=\\*[hd*mark],\\n[%]
+. if \\n[D]>2 .tm SETR: ref \\*[qrf*name]=\\*[hd-mark-trimmed],\\n[%]
. \" heading-number
-. ds \\*[qrf*name]-hn \\*[hd*mark]
+. ds \\*[qrf*name]-hn \\*[hd-mark-trimmed]
. \" page-number
. ds \\*[qrf*name]-pn \\n[%]
. \"
. if \\n[Ref] \{\
-. tm .ds \\*[qrf*name]-hn \\*[hd*mark]
+. tm .ds \\*[qrf*name]-hn \\*[hd-mark-trimmed]
. tm .ds \\*[qrf*name]-pn \\n[%]
. if !'\\$2'' .tm .ds \\*[qrf*name]-xx \\$2
. \}
