[Groff-commit] groff/contrib/mm m.tmac

[Anton Shepelev]

CVSROOT:        /sources/groff
Module name:    groff
Changes by:     Anton Shepelev <ant_222>        12/11/17 17:36:57

Modified files:
        contrib/mm     : m.tmac 

Log message:
        Fixed the format of header numbers in references.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/groff/contrib/mm/m.tmac?cvsroot=groff&r1=2.52&r2=2.53

Patches:
Index: m.tmac
===================================================================
RCS file: /sources/groff/groff/contrib/mm/m.tmac,v
retrieving revision 2.52
retrieving revision 2.53
diff -u -b -r2.52 -r2.53
--- m.tmac      14 Aug 2011 05:41:42 -0000      2.52
+++ m.tmac      17 Nov 2012 17:36:56 -0000      2.53
@@ -3,8 +3,8 @@
 .ds RE \\$2
 ..
 .\"
-.\" $Id: m.tmac,v 2.52 2011/08/14 05:41:42 wl Exp $
address@hidden $Revision: 2.52 $
+.\" $Id: m.tmac,v 2.53 2012/11/17 17:36:56 ant_222 Exp $
address@hidden $Revision: 2.53 $
 .ig
 
 Copyright (C) 1991-2006, 2009-2011
@@ -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
 .      \}