let html = import ../nixite/html.nix; it = import ./it.nix; in with html; [ (it "makes a p tag" { actual = tag "p" {} "Hello"; expected = { tag = "p"; attrs = {}; child = "Hello"; __toString = toHTML; }; }) (it "concatinates classes" { actual = toString (tag "p" {class = ["class1" "class2"];} "Hello"); expected = ''

Hello

''; }) (it "applies style" (let page = tag "html" {} [(tag "head" {} ["foo"])]; in { actual = addToHead page ["bar"]; expected = { tag = "html"; attrs = {}; child = [(tag "head" {} ["foo" "bar"])]; __toString = toHTML; }; })) ]