From 9d24c8dc57c2e226297b0a42fc7c076f08f9fe63 Mon Sep 17 00:00:00 2001
From: "Thomas A. Christensen II" <25492070+MillironX@users.noreply.github.com>
Date: Wed, 6 Apr 2022 09:02:32 -0500
Subject: [PATCH] Add test for div element

Signed-off-by: Thomas A. Christensen II <25492070+MillironX@users.noreply.github.com>
---
 test/runtests.jl | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/test/runtests.jl b/test/runtests.jl
index 70d614d..fa1b019 100644
--- a/test/runtests.jl
+++ b/test/runtests.jl
@@ -239,5 +239,15 @@ end #function
     @testset "Behaviors" begin
         # Test that attributes with underscores become attributes with dashes
         @test occursin("<i data-tooltip=\"foo\"/>", prettystring(i(; data_tooltip="foo")))
+
+        # Test that edge case functions can slurp their arguments
+        @test occursin(
+            """
+            <div>
+              <p>foo</p>
+              <p>bar</p>
+            </div>""",
+            prettystring(html_div(p("foo"), p("bar"))),
+        )
     end #testset
 end #testset