diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-07 21:49:46 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-07 21:49:46 +0000 |
commit | 6f4017b8ea7b75d0511f5b37ca3f58346315a071 (patch) | |
tree | 0c969953df4c7293f8733d17612740883aee6dd2 /src/Text/Pandoc/Writers/HTML.hs | |
parent | 54a0e4c3b2a518b3fa42c57450869260d02c493c (diff) | |
download | pandoc-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
Diffstat (limited to 'src/Text/Pandoc/Writers/HTML.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 2 |
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. |