summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Court`es2006-07-31 08:28:44 +0000
committerLudovic Court`es2006-07-31 08:28:44 +0000
commit61fe58764cfa95ef558131396bfc21e1d9e69e2b (patch)
tree0cd516745399aa9bf142f343df657f206e8c6bcd
parent3b50c7a71460b3cc7c073cc4536fd13a089b8979 (diff)
downloadskribilo-61fe58764cfa95ef558131396bfc21e1d9e69e2b.tar.gz
skribilo-61fe58764cfa95ef558131396bfc21e1d9e69e2b.tar.lz
skribilo-61fe58764cfa95ef558131396bfc21e1d9e69e2b.zip
HTML: Repeat document keywords in each file.
* src/guile/skribilo/engine/html.scm (&html-generic-document): Lookup the `:keywords' option in `(ast-document n)' rather than `n'. git-archimport-id: lcourtes@laas.fr--2005-libre/skribilo--devo--1.2--patch-38
-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 f035133..f685703 100644
--- a/src/guile/skribilo/engine/html.scm
+++ b/src/guile/skribilo/engine/html.scm
@@ -1204,7 +1204,7 @@
(ident (string-append id "-meta"))
(class (markup-class n))
(parent n)
- (body (markup-option n :keywords))))
+ (body (markup-option (ast-document n) :keywords))))
(head (new markup
(markup '&html-head)
(ident (string-append id "-head"))