module test import iTasks import Text.HTML //Start w = startEngine (viewInformation "" [ViewAs (\t->TtTag [] [Text t])] "bork") w Start w = startEngine (viewInformation "" [] (TtTag [] [Text "bork"])) w