aboutsummaryrefslogtreecommitdiff
path: root/src/guile/skribilo/engine/html.scm
diff options
context:
space:
mode:
authorLudovic Courtes2005-12-06 23:22:51 +0000
committerLudovic Courtes2005-12-06 23:22:51 +0000
commit6527e65a24da1d211f44b9f068d6f7ded77c6637 (patch)
treef082e31886a75149d7c610937a668e0e73c61ddd /src/guile/skribilo/engine/html.scm
parent42e397a7d41c5e71e783e0033b5171b933595588 (diff)
downloadskribilo-6527e65a24da1d211f44b9f068d6f7ded77c6637.tar.gz
skribilo-6527e65a24da1d211f44b9f068d6f7ded77c6637.tar.lz
skribilo-6527e65a24da1d211f44b9f068d6f7ded77c6637.zip
Fixed the handling of `footnote''s `:label' by the Lout/HTML engines.
* src/guile/skribilo/engine/lout.scm (footnote): Take the `:label' option into account. * src/guile/skribilo/engine/html.scm (footnote): Likewise. git-archimport-id: lcourtes@laas.fr--2005-mobile/skribilo--devel--1.2--patch-17
Diffstat (limited to 'src/guile/skribilo/engine/html.scm')
-rw-r--r--src/guile/skribilo/engine/html.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/guile/skribilo/engine/html.scm b/src/guile/skribilo/engine/html.scm
index b5c7a55..a376713 100644
--- a/src/guile/skribilo/engine/html.scm
+++ b/src/guile/skribilo/engine/html.scm
@@ -1422,11 +1422,11 @@
;* footnote ... */
;*---------------------------------------------------------------------*/
(markup-writer 'footnote
- :options '(:number)
+ :options '(:label)
:action (lambda (n e)
(printf "<a href=\"#footnote-~a\"><sup><small>~a</small></sup></a>"
(string-canonicalize (container-ident n))
- (markup-option n :number))))
+ (markup-option n :label))))
;*---------------------------------------------------------------------*/
;* linebreak ... */