@@ -497,6 +497,14 @@ replaceRefLinksBlock keytable (OrderedList lst) =
497497 OrderedList (map (replaceRefLinksBlockList keytable) lst)
498498replaceRefLinksBlock keytable (BulletList lst) =
499499 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)
500508replaceRefLinksBlock keytable other = other
501509
502510-- | Use key table to replace reference links with explicit links in an