Docx writer: fixed a regression (infinite loop on certain lists).
Bug was introduced by commit a868b238f2
.
This commit is contained in:
parent
892a4edeb1
commit
97fe6c35b5
1 changed files with 2 additions and 2 deletions
|
@ -733,8 +733,8 @@ mkLvl marker lvl =
|
|||
styleFor DefaultStyle 3 = "lowerRoman"
|
||||
styleFor DefaultStyle 4 = "decimal"
|
||||
styleFor DefaultStyle 5 = "lowerLetter"
|
||||
styleFor DefaultStyle 6 = "lowerRoman"
|
||||
styleFor DefaultStyle x = styleFor DefaultStyle (x `mod` 7)
|
||||
styleFor DefaultStyle 0 = "lowerRoman"
|
||||
styleFor DefaultStyle x = styleFor DefaultStyle (x `mod` 6)
|
||||
styleFor _ _ = "decimal"
|
||||
patternFor OneParen s = s ++ ")"
|
||||
patternFor TwoParens s = "(" ++ s ++ ")"
|
||||
|
|
Loading…
Add table
Reference in a new issue