summaryrefslogtreecommitdiff
path: root/test/lua/uppercase-header.lua
diff options
context:
space:
mode:
Diffstat (limited to 'test/lua/uppercase-header.lua')
-rw-r--r--test/lua/uppercase-header.lua9
1 files changed, 9 insertions, 0 deletions
diff --git a/test/lua/uppercase-header.lua b/test/lua/uppercase-header.lua
new file mode 100644
index 000000000..8e86911c0
--- /dev/null
+++ b/test/lua/uppercase-header.lua
@@ -0,0 +1,9 @@
+local text = require 'text'
+
+local function str_to_uppercase (s)
+ return pandoc.Str(text.upper(s.text))
+end
+
+function Header (el)
+ return pandoc.walk_block(el, {Str = str_to_uppercase})
+end