diff options
| author | John MacFarlane <fiddlosopher@gmail.com> | 2012-06-01 18:44:00 -0700 |
|---|---|---|
| committer | John MacFarlane <fiddlosopher@gmail.com> | 2012-06-01 18:44:00 -0700 |
| commit | 5669dc2a47398384e192a42da506bec4364d3980 (patch) | |
| tree | b482a0904077f68cecc8e99abc190d8a2d612a96 | |
| parent | be45b2877f9a543fc7e6762d6cb2ee021150452a (diff) | |
| download | pandoc-5669dc2a47398384e192a42da506bec4364d3980.tar.gz | |
Simplified bullet characters so they work with Word 2007.
Closes #520.
| -rw-r--r-- | src/Text/Pandoc/Writers/Docx.hs | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/src/Text/Pandoc/Writers/Docx.hs b/src/Text/Pandoc/Writers/Docx.hs index 91f620c5c..396e7a482 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -262,13 +262,13 @@ mkLvl marker lvl = ,show n) step = 720 hang = 480 - bulletFor 0 = "\8226" - bulletFor 1 = "\9702" - bulletFor 2 = "\8227" - bulletFor 3 = "\8259" - bulletFor 4 = "\8226" - bulletFor 5 = "\9702" - bulletFor _ = "\8227" + bulletFor 0 = "\x2022" -- filled circle + bulletFor 1 = "\x2013" -- en dash + bulletFor 2 = "\x2022" -- hyphen bullet + bulletFor 3 = "\x2013" + bulletFor 4 = "\x2022" + bulletFor 5 = "\x2013" + bulletFor _ = "\x2022" styleFor UpperAlpha _ = "upperLetter" styleFor LowerAlpha _ = "lowerLetter" styleFor UpperRoman _ = "upperRoman" |