diff options
author | Hubert Plociniczak <hubert.plociniczak@gmail.com> | 2016-10-05 13:14:05 +0200 |
---|---|---|
committer | Hubert Plociniczak <hubert.plociniczak@gmail.com> | 2016-10-12 18:36:40 +0200 |
commit | edc951ee7d43f9ef548686ef9ba82380f7235d2b (patch) | |
tree | 11c0367892d2123313058614579cda4475f722cf /src/Text/Pandoc/Readers/Odt/ContentReader.hs | |
parent | cbeb72d06b4eb3718479eba5257a33a385f642fe (diff) | |
download | pandoc-edc951ee7d43f9ef548686ef9ba82380f7235d2b.tar.gz |
[ODT Parser] Include list's starting value
Previously the starting value of the lists' items has been
hardcoded to 1. In reality ODT's list style definition can
provide a new starting value in one of its attributes.
Writers already handle the modified start value so no need
to change anything in that area.
Diffstat (limited to 'src/Text/Pandoc/Readers/Odt/ContentReader.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/Odt/ContentReader.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Odt/ContentReader.hs b/src/Text/Pandoc/Readers/Odt/ContentReader.hs index 8c475eefc..35fbc3731 100644 --- a/src/Text/Pandoc/Readers/Odt/ContentReader.hs +++ b/src/Text/Pandoc/Readers/Odt/ContentReader.hs @@ -386,7 +386,7 @@ getListConstructor ListLevelStyle{..} = LltNumbered -> let listNumberStyle = toListNumberStyle listItemFormat listNumberDelim = toListNumberDelim listItemPrefix listItemSuffix - in orderedListWith (1, listNumberStyle, listNumberDelim) + in orderedListWith (listItemStart, listNumberStyle, listNumberDelim) where toListNumberStyle LinfNone = DefaultStyle toListNumberStyle LinfNumber = Decimal |