Fix a bug in the FreeBSD print stylesheet that resulted in the
combination of %footnote-ulink% and bop-footnotes not generating any URL footnotes (although other footnotes in documents were correct). freebsd.dsl contains a modified definition of the ulink element as defined in dblink.dsl from the DSSSL print stylesheet; unfortunately it was missing some lines of code, which we restore. As of this commit, no document in the FDP uses %footnote-ulink%, although the release documentation will enable it shortly.
This commit is contained in:
parent
d80eda8fc7
commit
a2d357c3a4
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/head/; revision=11616
1 changed files with 20 additions and 1 deletions
|
@ -434,7 +434,26 @@
|
||||||
(make sequence
|
(make sequence
|
||||||
($charseq$)
|
($charseq$)
|
||||||
(if %footnote-ulinks%
|
(if %footnote-ulinks%
|
||||||
($ss-seq$ + (literal (footnote-number (current-node))))
|
(if (and (equal? (print-backend) 'tex) bop-footnotes)
|
||||||
|
(make sequence
|
||||||
|
($ss-seq$ + (literal (footnote-number (current-node))))
|
||||||
|
(make page-footnote
|
||||||
|
(make paragraph
|
||||||
|
font-size: (* %footnote-size-factor% %bf-size%)
|
||||||
|
font-posture: 'upright
|
||||||
|
quadding: %default-quadding%
|
||||||
|
line-spacing: (* (* %footnote-size-factor% %bf-size%)
|
||||||
|
%line-spacing-factor%)
|
||||||
|
space-before: %para-sep%
|
||||||
|
space-after: %para-sep%
|
||||||
|
start-indent: %footnote-field-width%
|
||||||
|
first-line-start-indent: (- %footnote-field-width%)
|
||||||
|
(make line-field
|
||||||
|
field-width: %footnote-field-width%
|
||||||
|
(literal (footnote-number (current-node))
|
||||||
|
(gentext-label-title-sep (normalize "footnote"))))
|
||||||
|
(literal (attribute-string (normalize "url"))))))
|
||||||
|
($ss-seq$ + (literal (footnote-number (current-node)))))
|
||||||
(if (and %show-ulinks%
|
(if (and %show-ulinks%
|
||||||
(not (equal? (fix-url (attribute-string (normalize "url")))
|
(not (equal? (fix-url (attribute-string (normalize "url")))
|
||||||
(data-of (current-node)))))
|
(data-of (current-node)))))
|
||||||
|
|
Loading…
Reference in a new issue