diff --git a/Yesod/Form/Profiles.hs b/Yesod/Form/Profiles.hs index c44303fd..88d89fc6 100644 --- a/Yesod/Form/Profiles.hs +++ b/Yesod/Form/Profiles.hs @@ -231,7 +231,7 @@ searchFieldProfile autoFocus = FieldProfile addHtml $ [HAMLET|\ |] addCassius [CASSIUS| - #$theId$ + #{theId} -webkit-appearance: textfield |] } diff --git a/hellowidget.hs b/hellowidget.hs index c579d3a9..dc52933a 100644 --- a/hellowidget.hs +++ b/hellowidget.hs @@ -53,7 +53,7 @@ getRootR = defaultLayout $ wrapper $ do i <- newIdent setTitle $ string "Hello Widgets" addCassius [$cassius| -#$i$ +#{i} color: red |] addStylesheet $ StaticR $ StaticRoute ["style.css"] [] @@ -61,7 +61,7 @@ getRootR = defaultLayout $ wrapper $ do addScriptRemote "http://ajax.googleapis.com/ajax/libs/jquery/1.4.2/jquery.min.js" addScript $ StaticR $ StaticRoute ["script.js"] [] addHamlet [$hamlet| -%h1#$i$ Welcome to my first widget!!! +%h1#{i} Welcome to my first widget!!! %p %a!href=@RootR@ Recursive link. %p