@@ -1321,7 +1321,7 @@ fancyverbEnv name = do
1321 codeBlockWith attr <$> verbEnv name
1321 codeBlockWith attr <$> verbEnv name
1323orderedList' :: PandocMonad m => LP m Blocks
1323orderedList' :: PandocMonad m => LP m Blocks
1324−orderedList' = do
1324+orderedList' = try $ do
1325 optional sp
1325 optional sp
1326 (_, style, delim) <- option (1, DefaultStyle, DefaultDelim) $
1326 (_, style, delim) <- option (1, DefaultStyle, DefaultDelim) $
1327 try $ char '[' *> anyOrderedListMarker <* char ']'
1327 try $ char '[' *> anyOrderedListMarker <* char ']'