summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--data/pandoc.lua4
-rw-r--r--src/Text/Pandoc/Lua/StackInstances.hs2
2 files changed, 3 insertions, 3 deletions
diff --git a/data/pandoc.lua b/data/pandoc.lua
index bb79724aa..bd3822514 100644
--- a/data/pandoc.lua
+++ b/data/pandoc.lua
@@ -265,12 +265,12 @@ M.Div = M.Block:create_constructor(
--- Creates a block quote element.
-- @function Header
-- @tparam int level header level
--- @tparam Attributes attributes element attributes
-- @tparam {Inline,...} content inline content
+-- @tparam Attributes attributes element attributes
-- @treturn Block header element
M.Header = M.Block:create_constructor(
"Header",
- function(level, attributes, content)
+ function(level, content, attributes)
return {c = {level, attributes, content}}
end,
{"level", {"identifier", "classes", "attributes"}, "content"}
diff --git a/src/Text/Pandoc/Lua/StackInstances.hs b/src/Text/Pandoc/Lua/StackInstances.hs
index 52151ce64..acf2b7eb1 100644
--- a/src/Text/Pandoc/Lua/StackInstances.hs
+++ b/src/Text/Pandoc/Lua/StackInstances.hs
@@ -173,7 +173,7 @@ pushBlock lua = \case
CodeBlock attr code -> pushViaConstructor lua "CodeBlock" code (LuaAttr attr)
DefinitionList items -> pushViaConstructor lua "DefinitionList" items
Div attr blcks -> pushViaConstructor lua "Div" blcks (LuaAttr attr)
- Header lvl attr inlns -> pushViaConstructor lua "Header" lvl (LuaAttr attr) inlns
+ Header lvl attr inlns -> pushViaConstructor lua "Header" lvl inlns (LuaAttr attr)
HorizontalRule -> pushViaConstructor lua "HorizontalRule"
LineBlock blcks -> pushViaConstructor lua "LineBlock" blcks
OrderedList lstAttr list -> pushViaConstructor lua "OrderedList" list lstAttr