Mercurial > hg > ooxml
changeset 31:6270bef9b5d4
need to preserve abs ref info
| author | Henry S. Thompson <ht@markup.co.uk> |
|---|---|
| date | Wed, 12 Apr 2017 11:36:27 +0100 |
| parents | 16eff0d30d4d |
| children | f4432c1faf7f |
| files | refs.xsl |
| diffstat | 1 files changed, 4 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/refs.xsl Tue Apr 11 17:03:39 2017 +0100 +++ b/refs.xsl Wed Apr 12 11:36:27 2017 +0100 @@ -49,7 +49,7 @@ not($l[@nr=10 and .=(':','!')]) and not($r[@nr=10 and .=':'])) - then translate($t,'$','') + then string($t) else (), $ranges := for $i in (1 to count($tokens)) return let $t := $tokens[$i] return @@ -62,20 +62,17 @@ else $l, $r1 := if ($r/@nr=9) then e:lookup($r) else $r - return translate(concat($l1,':',$r1), - '$','') + return concat($l1,':',$r1) else (), $externals := for $i in (1 to count($tokens)) return let $t := $tokens[$i] return if ($t/@nr=7) then - let $bit := concat($t,'!', - translate($tokens[$i + 2], - '$','')) return + let $bit := concat($t,'!',$tokens[$i + 2]) return if ((($i+3) le $n) and $tokens[$i + 3][@nr=10 and .=':']) then concat($bit,':', - translate($tokens[$i + 4],'$','')) + $tokens[$i + 4]) else $bit else () return [($singles,for $a in $recur return $a?1),