Two things: 1) You need to change the return type of toHamlet from Html to Hamlet YourRoute 2) I think you meant Michael On Tue, Mar 15, 2011 at 9:28 PM, Anton Cheshkov wrote:

Hello Michael.  Hello All. Please help me to explain  what is wrong i have a function which worked before i add line <img src="StaticR p1_png"> : toHamlet :: [SearchResult] -> String - > Int -> Html toHamlet results queryId n = [$hamlet| $forall r <- results     

        

           <img src="StaticR p1_png">         

            <span>#{snd $ snd r}         

        

|] I have the compile time error: Couldn't match expected type `hamlet-0.7.1:Text.Hamlet.Quasi.R:HamletUrlHtmlM'            against inferred type `EstateRoute'     In the first argument of `\ u[ahZb]                                   -> hamlet-0.7.1:Text.Hamlet.Quasi.urlToHamletMonad                                        u[ahZb] []', namely         `StaticR p1_png'     In a stmt of a 'do' expression:         \ u[ahZb]             -> hamlet-0.7.1:Text.Hamlet.Quasi.urlToHamletMonad u[ahZb] []           (StaticR p1_png)     In the expression:         do { (hamlet-0.7.1:Text.Hamlet.Quasi.htmlToHamletMonad             . preEscapedString)                "