6 Jun
2011
6 Jun
'11
1:22 p.m.
On Mon, Jun 6, 2011 at 00:41, Mark Bradley
You should try including the widget using the ^{} syntax instead of the ${} syntax.
Doesn't appear to work. I tried this: blockW :: Widget () blockW = do contents <- do addHamlet [hamlet|example|] addHamlet [hamlet|
[(Data.Text.Internal.Text,
Data.Text.Internal.Text)]
-> Data.Text.Internal.Text)
-> Html'
In the return type of a call of
`hamlet-0.8.2:Text.Hamlet.Quasi.toHamletValue'
In the first argument of `addHamlet', namely
`hamlet-0.8.2:Text.Hamlet.Quasi.toHamletValue
(do { (hamlet-0.8.2:Text.Hamlet.Quasi.htmlToHamletMonad
. preEscapedString)
"<div>";
hamlet-0.8.2:Text.Hamlet.Quasi.fromHamletValue contents;
(hamlet-0.8.2:Text.Hamlet.Quasi.htmlToHamletMonad
. preEscapedString)
"</div>" })'
In the expression:
addHamlet
(hamlet-0.8.2:Text.Hamlet.Quasi.toHamletValue
(do { (hamlet-0.8.2:Text.Hamlet.Quasi.htmlToHamletMonad
. preEscapedString)
"<div>";
hamlet-0.8.2:Text.Hamlet.Quasi.fromHamletValue contents;
(hamlet-0.8.2:Text.Hamlet.Quasi.htmlToHamletMonad
. preEscapedString)
"</div>" }))