diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-03-15 17:19:28 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-15 17:19:28 +0100 |
| commit | 482e5b78a05a02df512a495a2a67657879a2d436 (patch) | |
| tree | cb3bdd161c0e20fe7a860ecf9918110f1acd8253 /src/Text/Pandoc | |
| parent | cc57e361807d92f711b3bcd337647674fc9bf156 (diff) | |
| download | pandoc-482e5b78a05a02df512a495a2a67657879a2d436.tar.gz | |
OpenDocument writer: use more widely available bullet characters.
The old characters weren't available in some font sets.
These seem to work well on Windows and Linux versions of LibreOffice.
Closes #1400.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/OpenDocument.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/OpenDocument.hs b/src/Text/Pandoc/Writers/OpenDocument.hs index 961bb981a..3432d258a 100644 --- a/src/Text/Pandoc/Writers/OpenDocument.hs +++ b/src/Text/Pandoc/Writers/OpenDocument.hs @@ -503,7 +503,7 @@ bulletListStyle l = do , ("style:num-suffix", "." ) , ("text:bullet-char", [bulletList !! i] ) ] (listLevelStyle (1 + i)) - bulletList = map chr $ cycle [8226,8227,8259] + bulletList = map chr $ cycle [8226,9702,9642] listElStyle = map doStyles [0..9] pn <- paraListStyle l return (pn, (l, listElStyle)) |