From 98aa67a68db09360ac626eea7ed65422c4e50596 Mon Sep 17 00:00:00 2001
From: Greg Weber <greg@gregweber.info>
Date: Tue, 8 Feb 2011 12:43:01 -0800
Subject: [PATCH] hamlet6to7

---
 Yesod/Form/Profiles.hs | 2 +-
 hellowidget.hs         | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

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|\<script>if (!('autofocus' in document.createElement('input'))) {document.getElementById('#{theId}').focus();}</script> 
 |]
           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