aboutsummaryrefslogtreecommitdiff
path: root/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2008-07-13 16:32:14 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2008-07-13 16:32:14 +0000
commit1b3328ca3869d361dc6d8a9c0025b28f7cf9f0a9 (patch)
treebab6a8ef16368a48bdca797d6af6870ce54a98f6 /Text/Pandoc/Writers
parentbe719b2a44ecdc1278a81bd9716b1db1af53b2d7 (diff)
downloadpandoc-1b3328ca3869d361dc6d8a9c0025b28f7cf9f0a9.tar.gz
OpenDocument writer: Indented bulleted lists as we do enumerated lists.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1306 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'Text/Pandoc/Writers')
-rw-r--r--Text/Pandoc/Writers/OpenDocument.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Writers/OpenDocument.hs b/Text/Pandoc/Writers/OpenDocument.hs
index 0de4d98fd..50a9c397c 100644
--- a/Text/Pandoc/Writers/OpenDocument.hs
+++ b/Text/Pandoc/Writers/OpenDocument.hs
@@ -383,7 +383,7 @@ bulletListStyle l =
, ("text:style-name" , "Bullet_20_Symbols")
, ("style:num-suffix", "." )
, ("text:bullet-char", [bulletList !! i] )
- ] (listLevelStyle i)
+ ] (listLevelStyle (1 + i))
bulletList = map chr $ cycle [8226,8227,8259]
listElStyle = map doStyles [0..9]
in do pn <- paraListStyle l