summaryrefslogtreecommitdiff
path: root/test.lua
diff options
context:
space:
mode:
Diffstat (limited to 'test.lua')
-rwxr-xr-xtest.lua21
1 files changed, 21 insertions, 0 deletions
diff --git a/test.lua b/test.lua
index 81d5d77..2a733a1 100755
--- a/test.lua
+++ b/test.lua
@@ -64,3 +64,24 @@ test("marigold.h produces a correct basic tag", function()
end
assert(#(h1.children) == 0)
end)
+
+
+test("marigold.h correctly adds children", function()
+ local h = marigold.h
+ local div = h('div', "some stuff", {
+ h('p', "the first paragraph"),
+ h('p', "the second paragraph"),
+ })
+
+ assert(div.tag == 'div')
+ assert(div.content == "some stuff")
+ -- still should have nothing in the attributes table
+ for k, v in ipairs(div.attributes) do
+ assert(false, string.format("%s, %s", tostring(k), tostring(v)))
+ end
+ assert(#div.children == 2)
+ assert(div.children[1].tag == 'p')
+ assert(div.children[1].content == 'the first paragraph')
+ assert(div.children[2].tag == 'p')
+ assert(div.children[2].content == 'the second paragraph')
+end)