diff options
Diffstat (limited to 'test/Tests/Lua.hs')
-rw-r--r-- | test/Tests/Lua.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/test/Tests/Lua.hs b/test/Tests/Lua.hs index 06f100048..fea813890 100644 --- a/test/Tests/Lua.hs +++ b/test/Tests/Lua.hs @@ -70,6 +70,12 @@ tests = map (localOption (QuickCheckTests 20)) "metatable-catch-all.lua" (doc . para $ "four words, three spaces") (doc . para $ str "7") + + , testCase "Count blocks via Block-specific catch-all" $ + assertFilterConversion "filtering with Block catch-all failed" + "block-count.lua" + (doc $ para "one" <> para "two") + (doc $ para "2") ] assertFilterConversion :: String -> FilePath -> Pandoc -> Pandoc -> Assertion |