From 525881ee522ea36ae48618b1cf184ba66ea91c04 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 20 Jan 2012 13:07:14 -0800 Subject: Docx writer: Start bullet lists with solid bullet. --- src/Text/Pandoc/Writers/Docx.hs | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) (limited to 'src') diff --git a/src/Text/Pandoc/Writers/Docx.hs b/src/Text/Pandoc/Writers/Docx.hs index 1f28e5d17..358cc468f 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -251,12 +251,13 @@ mkLvl marker lvl = ,show n) step = 720 hang = step `div` 2 - bulletFor 1 = "\8226" - bulletFor 2 = "\9702" - bulletFor 3 = "\8227" - bulletFor 4 = "\8259" - bulletFor 5 = "\8226" - bulletFor _ = "\9702" + bulletFor 0 = "\8226" + bulletFor 1 = "\9702" + bulletFor 2 = "\8227" + bulletFor 3 = "\8259" + bulletFor 4 = "\8226" + bulletFor 5 = "\9702" + bulletFor _ = "\8227" styleFor UpperAlpha _ = "upperLetter" styleFor LowerAlpha _ = "lowerLetter" styleFor UpperRoman _ = "upperRoman" -- cgit v1.2.3