0d2e5ea · typeable/pandoc

git.iko.soy/typeable/pandoc

on master help sign in

Added clauses for DefinitionList and Table to replaceReferenceLinks in

0d2e5eafiddlosopher20 years ago

src/Text/Pandoc/Shared.hs+8

@@ -497,6 +497,14 @@ replaceRefLinksBlock keytable (OrderedList lst) =

497 OrderedList (map (replaceRefLinksBlockList keytable) lst)

498replaceRefLinksBlock keytable (BulletList lst) =

499 BulletList (map (replaceRefLinksBlockList keytable) lst)

500+replaceRefLinksBlock keytable (DefinitionList lst) =

501+ DefinitionList (map (\(term, def) ->

502+ (map (replaceRefLinksInline keytable) term,

503+ replaceRefLinksBlockList keytable def)) lst)

504+replaceRefLinksBlock keytable (Table caption alignment widths headers rows) =

505+ Table (map (replaceRefLinksInline keytable) caption) alignment widths

506+ (map (replaceRefLinksBlockList keytable) headers)

507+ (map (map (replaceRefLinksBlockList keytable)) rows)

500replaceRefLinksBlock keytable other = other

508replaceRefLinksBlock keytable other = other

501

509

502-- | Use key table to replace reference links with explicit links in an

510-- | Use key table to replace reference links with explicit links in an