diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2018-02-16 12:53:41 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-02-16 12:53:41 +0300 |
| commit | 0e4b8ae36296030569627baa537b9d71af621d20 (patch) | |
| tree | 8f4ebc13de0b3143c0889512d424627098e591ec /src | |
| parent | e6ff7f79861d3088f8cba2b22d86d9f75db73f6a (diff) | |
Muse reader: prioritize lists with roman numerals over alphabetical lists
This is to make sure "i." starts a roman numbered list,
instead of a list with letter "i" (followed by "j", "k", ...").
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Readers/Muse.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Muse.hs b/src/Text/Pandoc/Readers/Muse.hs index 7504a33ca..a842925a2 100644 --- a/src/Text/Pandoc/Readers/Muse.hs +++ b/src/Text/Pandoc/Readers/Muse.hs @@ -576,7 +576,7 @@ bulletListUntil end = try $ do -- | Parses an ordered list marker and returns list attributes. anyMuseOrderedListMarker :: PandocMonad m => MuseParser m ListAttributes anyMuseOrderedListMarker = do - (style, start) <- decimal <|> lowerAlpha <|> lowerRoman <|> upperAlpha <|> upperRoman + (style, start) <- decimal <|> lowerRoman <|> upperRoman <|> lowerAlpha <|> upperAlpha char '.' return (start, style, Period) |