aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Lua/Walk.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Lua/Walk.hs')
-rw-r--r--src/Text/Pandoc/Lua/Walk.hs24
1 files changed, 24 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Lua/Walk.hs b/src/Text/Pandoc/Lua/Walk.hs
index 5b62001de..695c7b44e 100644
--- a/src/Text/Pandoc/Lua/Walk.hs
+++ b/src/Text/Pandoc/Lua/Walk.hs
@@ -59,6 +59,18 @@ instance Walkable (SingletonsList Inline) Row where
walkM = walkRowM
query = queryRow
+instance Walkable (SingletonsList Inline) TableHead where
+ walkM = walkTableHeadM
+ query = queryTableHead
+
+instance Walkable (SingletonsList Inline) TableBody where
+ walkM = walkTableBodyM
+ query = queryTableBody
+
+instance Walkable (SingletonsList Inline) TableFoot where
+ walkM = walkTableFootM
+ query = queryTableFoot
+
instance Walkable (SingletonsList Inline) Caption where
walkM = walkCaptionM
query = queryCaption
@@ -102,6 +114,18 @@ instance Walkable (SingletonsList Block) Row where
walkM = walkRowM
query = queryRow
+instance Walkable (SingletonsList Block) TableHead where
+ walkM = walkTableHeadM
+ query = queryTableHead
+
+instance Walkable (SingletonsList Block) TableBody where
+ walkM = walkTableBodyM
+ query = queryTableBody
+
+instance Walkable (SingletonsList Block) TableFoot where
+ walkM = walkTableFootM
+ query = queryTableFoot
+
instance Walkable (SingletonsList Block) Caption where
walkM = walkCaptionM
query = queryCaption