Docx writer: Start bullet lists with solid bullet.

This commit is contained in:
John MacFarlane
2012-01-20 13:07:14 -08:00
parent 2a84e748a9
commit 525881ee52
+7 -6
View File
@@ -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"