97fe6c3 · typeable/pandoc

git.iko.soy/typeable/pandoc

Docx writer: fixed a regression (infinite loop on certain lists).

Bug was introduced by commit a868b238f253423281b2648896f184e7cdc05014.

commit97fe6c35b5c8c5e3e076f712e841f1db13c5a0bd authorJohn MacFarlane <jgm@berkeley.edu> dateTue 15 Aug 2017, 14:01 (9 years ago) parent892a4ed

1 file changed+2−2

unifiedsplit

src/Text/Pandoc/Writers/Docx.hs+2−2

@@ -733,8 +733,8 @@ mkLvl marker lvl =

733733 styleFor DefaultStyle 3 = "lowerRoman"

734734 styleFor DefaultStyle 4 = "decimal"

735735 styleFor DefaultStyle 5 = "lowerLetter"

736− styleFor DefaultStyle 6 = "lowerRoman"

737− styleFor DefaultStyle x = styleFor DefaultStyle (x `mod` 7)

736+ styleFor DefaultStyle 0 = "lowerRoman"

737+ styleFor DefaultStyle x = styleFor DefaultStyle (x `mod` 6)

738738 styleFor _ _ = "decimal"

739739 patternFor OneParen s = s ++ ")"

740740 patternFor TwoParens s = "(" ++ s ++ ")"