Add filters tests

Author: dragonstyle

tests/docs/filters/behead.py

@@ -0,0 +1,15 @@
+#!/usr/bin/env python
+
+"""
+Pandoc filter to convert all level 2+ headings to paragraphs with
+emphasized text.
+"""
+
+from pandocfilters import toJSONFilter, Emph, Para
+
+def behead(key, value, format, meta):
+  if key == 'Header' and value[0] >= 2:
+    return Para([Emph(value[2])])
+
+if __name__ == "__main__":
+  toJSONFilter(behead)

tests/docs/filters/both.qmd

@@ -0,0 +1,12 @@
+---
+title: Both types of filters
+filters:
+  - type: json
+    path: behead.py
+  - type: lua
+    path: smallcaps.lua
+---
+
+## This should be em
+
+**This should be small caps**

tests/docs/filters/fail-if-callout.lua

@@ -0,0 +1,10 @@
+
+return {
+  {
+    Div = function (elem)
+      if elem.attr.classes:includes("callout") then
+        error("THERE WAS A PROCESSED CALLOUT!\nIf the filter order is correct, this should not happen.")
+      end
+    end,
+  }
+}

tests/docs/filters/filter-order.qmd

@@ -0,0 +1,11 @@
+---
+title: Test Filter Order
+filters:
+  - fail-if-callout.lua
+  - quarto
+---
+
+:::{.callout-note}
+Note that there are five types of callouts.
+:::
+

tests/docs/filters/lua-filter.qmd

@@ -0,0 +1,7 @@
+---
+title: Lua Filter Test
+filters:
+  - smallcaps.lua
+---
+
+**This should be in all caps**

tests/docs/filters/python-filter.qmd

@@ -0,0 +1,10 @@
+---
+title: Test Python Filter
+filters:
+  - type: json
+    path: behead.py
+---
+
+## This is a test
+
+## This should be em

tests/docs/filters/smallcaps.lua

@@ -0,0 +1,7 @@
+return {
+  {
+    Strong = function (elem)
+      return pandoc.SmallCaps(elem.c)
+    end,
+  }
+}

tests/smoke/filters/filters.test.ts

@@ -0,0 +1,44 @@
+import { ensureHtmlElements } from "../../verify.ts";
+import { testRender } from "../render/render.ts";
+import { docs, outputForInput } from "../../utils.ts";
+import { join } from "path/mod.ts";
+
+const verifySmallCaps = ["main.content span.smallcaps"];
+const verifyBehead = ["main.content em"];
+const verifyBeheadExclude = ["h2"];
+
+// Test that the small cap filter properly runs
+const luaInput = docs(join("filters", "lua-filter.qmd"));
+const luaOutput = outputForInput(luaInput, "html");
+testRender(luaInput, "html", false, [
+  ensureHtmlElements(luaOutput.outputPath, [
+    ...verifySmallCaps,
+  ]),
+]);
+
+// Test that the python behead filter is working
+const pythonInput = docs(join("filters", "python-filter.qmd"));
+const pythonOutput = outputForInput(pythonInput, "html");
+testRender(pythonInput, "html", false, [
+  ensureHtmlElements(pythonOutput.outputPath, [
+    ...verifyBehead,
+  ], [
+    ...verifyBeheadExclude,
+  ]),
+]);
+
+// Test that the python behead filter is working
+const bothInput = docs(join("filters", "both.qmd"));
+const bothOutput = outputForInput(bothInput, "html");
+testRender(bothInput, "html", false, [
+  ensureHtmlElements(bothOutput.outputPath, [
+    ...verifySmallCaps,
+    ...verifyBehead,
+  ], [
+    ...verifyBeheadExclude,
+  ]),
+]);
+
+// Test that filter order works
+const orderInput = docs(join("filters", "filter-order.qmd"));
+testRender(orderInput, "html", false);