aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-07 21:49:46 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-07 21:49:46 +0000
commit6f4017b8ea7b75d0511f5b37ca3f58346315a071 (patch)
tree0c969953df4c7293f8733d17612740883aee6dd2
parent54a0e4c3b2a518b3fa42c57450869260d02c493c (diff)
downloadpandoc-6f4017b8ea7b75d0511f5b37ca3f58346315a071.tar.gz
Put table of contents in its own div (id="toc").
git-svn-id: https://pandoc.googlecode.com/svn/trunk@635 788f1e2b-df1e-0410-8736-df70ead52e1b
-rw-r--r--src/Text/Pandoc/Writers/HTML.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index 5dcca4825..7eb714784 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -100,7 +100,7 @@ tableOfContents opts headers ids =
contentsTree = hierarchicalize headers
contents = evalState (mapM (elementToListItem opts') contentsTree)
([],ids)
- in unordList ! [identifier "toc"] $ contents
+ in thediv ! [identifier "toc"] $ unordList contents
-- | Converts an Element to a list item for a table of contents,
-- retrieving the appropriate identifier from state.