327e142 · typeable/pandoc

git.iko.soy/typeable/pandoc

gfm/commonmark writer: implement start number on ordered lists.

Previously they always started at 1, but according to the spec the start number is respected. Closes #7009.

commit327e1428c5cdcb62beef6d2e00ab6f1d699256f0 authorJohn MacFarlane <jgm@berkeley.edu> dateThu 7 Jan 2021, 16:41 (6 years ago) parentc0d8b18

2 files changed+12−1

unifiedsplit

src/Text/Pandoc/Writers/Markdown.hs+4−1

@@ -674,7 +674,10 @@ blockToMarkdown' opts (BulletList items) = do

674674 contents <- inList $ mapM (bulletListItemToMarkdown opts) items

675675 return $ (if isTightList items then vcat else vsep) contents <> blankline

676676blockToMarkdown' opts (OrderedList (start,sty,delim) items) = do

677− let start' = if isEnabled Ext_startnum opts then start else 1

677+ variant <- asks envVariant

678+ let start' = if variant == Commonmark || isEnabled Ext_startnum opts

679+ then start

680+ else 1

678681 let sty' = if isEnabled Ext_fancy_lists opts then sty else DefaultStyle

679682 let delim' = if isEnabled Ext_fancy_lists opts then delim else DefaultDelim

680683 let attribs = (start', sty', delim')

test/command/7009.mdnew file+8

@@ -0,0 +1,8 @@

1+```

2+% pandoc -t gfm

3+3. a

4+4. b

5+^D

6+3. a

7+4. b

8+```