From ab7e86ad48848bae1987a79753e043191aaf3ea1 Mon Sep 17 00:00:00 2001
From: Alexander Kojevnikov <alexander@kojevnikov.com>
Date: Wed, 3 Aug 2011 22:41:20 +0800
Subject: [PATCH] Fix scaffolding compiler warnings

---
 yesod/scaffold/config/Settings.hs.cg | 2 +-
 yesod/scaffold/sitearg.hs.cg         | 2 --
 2 files changed, 1 insertion(+), 3 deletions(-)

diff --git a/yesod/scaffold/config/Settings.hs.cg b/yesod/scaffold/config/Settings.hs.cg
index 83690457..6da3f68b 100644
--- a/yesod/scaffold/config/Settings.hs.cg
+++ b/yesod/scaffold/config/Settings.hs.cg
@@ -32,7 +32,7 @@ import Yesod (liftIO, MonadControlIO, addWidget, addCassius, addJulius, addLuciu
 import Data.Monoid (mempty, mappend)
 import System.Directory (doesFileExist)
 import Prelude hiding (concat)
-import Data.Text (Text, snoc, append, pack, concat)
+import Data.Text (Text)
 import Data.Object
 import qualified Data.Object.Yaml as YAML
 import Control.Monad (join)
diff --git a/yesod/scaffold/sitearg.hs.cg b/yesod/scaffold/sitearg.hs.cg
index e53d3667..d0b2a221 100644
--- a/yesod/scaffold/sitearg.hs.cg
+++ b/yesod/scaffold/sitearg.hs.cg
@@ -16,7 +16,6 @@ module ~sitearg~
     ) where
 
 import Yesod
-import Yesod.Form (defaultFormMessage)
 import Yesod.Static
 import Yesod.Auth
 import Yesod.Auth.OpenId
@@ -27,7 +26,6 @@ import qualified Data.ByteString.Lazy as L
 import Database.Persist.GenericSql
 import Settings (hamletFile, cassiusFile, luciusFile, juliusFile, widgetFile)
 import Model
-import StaticFiles
 import Data.Maybe (isJust)
 import Control.Monad (join, unless)
 import Network.Mail.Mime