diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2018-03-08 10:19:23 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2018-03-08 10:19:23 -0800 |
| commit | 6173c3c83082070ff1b6063ca9fda77822f79087 (patch) | |
| tree | 73d4353e7d7d567e7dc077afe2f6d9ee783941c4 /src/Text | |
| parent | 0e45cc1297261c9a014697c6d6a0ca3cd80824dc (diff) | |
| download | pandoc-6173c3c83082070ff1b6063ca9fda77822f79087.tar.gz | |
Fixed formatting of DefaultStyle ordered lists in docx writer.
We want decimal for the top level, not lower roman.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/Docx.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/Text/Pandoc/Writers/Docx.hs b/src/Text/Pandoc/Writers/Docx.hs index 4542389a2..2c03b3450 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -708,12 +708,12 @@ mkLvl marker lvl = styleFor UpperRoman _ = "upperRoman" styleFor LowerRoman _ = "lowerRoman" styleFor Decimal _ = "decimal" - styleFor DefaultStyle 1 = "decimal" - styleFor DefaultStyle 2 = "lowerLetter" - styleFor DefaultStyle 3 = "lowerRoman" - styleFor DefaultStyle 4 = "decimal" - styleFor DefaultStyle 5 = "lowerLetter" - styleFor DefaultStyle 0 = "lowerRoman" + styleFor DefaultStyle 0 = "decimal" + styleFor DefaultStyle 1 = "lowerLetter" + styleFor DefaultStyle 2 = "lowerRoman" + styleFor DefaultStyle 3 = "decimal" + styleFor DefaultStyle 4 = "lowerLetter" + styleFor DefaultStyle 5 = "lowerRoman" styleFor DefaultStyle x = styleFor DefaultStyle (x `mod` 6) styleFor _ _ = "decimal" patternFor OneParen s = s ++ ")" |