aboutsummaryrefslogtreecommitdiff
path: root/src/guile/skribilo/engine/html.scm
diff options
context:
space:
mode:
authorLudovic Courtès2012-11-29 23:22:18 +0100
committerLudovic Courtès2012-11-29 23:22:18 +0100
commit1e59414742f80bd77e499fa13792c94aeecf6cd2 (patch)
tree9df0ff85e34fc8dbdd14d44c3b69a03f6d3f3b87 /src/guile/skribilo/engine/html.scm
parent827e5b8965dd569e241a5fef1af5527b51df5d83 (diff)
downloadskribilo-1e59414742f80bd77e499fa13792c94aeecf6cd2.tar.gz
skribilo-1e59414742f80bd77e499fa13792c94aeecf6cd2.tar.lz
skribilo-1e59414742f80bd77e499fa13792c94aeecf6cd2.zip
html: Emit each footnote only once.
* src/guile/skribilo/engine/html.scm (&html-generic-document): When matching a container list, don't add N to CONTAINERS since it's already there. Reported by Klaus Schilling <schilling.klaus@web.de>.
Diffstat (limited to 'src/guile/skribilo/engine/html.scm')
-rw-r--r--src/guile/skribilo/engine/html.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/guile/skribilo/engine/html.scm b/src/guile/skribilo/engine/html.scm
index c7484b2..3a58084 100644
--- a/src/guile/skribilo/engine/html.scm
+++ b/src/guile/skribilo/engine/html.scm
@@ -1211,7 +1211,7 @@
n)
((containers ...)
(reverse
- (let loop ((subsections (cons n containers))
+ (let loop ((subsections containers)
(footnotes '()))
(match subsections
((subsections ...)