diff --git a/yesod/Scaffold/Build.hs b/yesod/Scaffold/Build.hs
index 64202dc4..69a54b97 100644
--- a/yesod/Scaffold/Build.hs
+++ b/yesod/Scaffold/Build.hs
@@ -18,6 +18,7 @@ import Data.Monoid (mappend)
 import qualified Data.Map as Map
 import qualified Data.Set as Set
 import System.PosixCompat.Files (accessTime, modificationTime, getFileStatus, setFileTimes)
+import qualified System.Posix.Types
 import Control.Monad (filterM, forM)
 import Control.Exception (SomeException, try)
 
@@ -55,6 +56,7 @@ touchDeps =
 try' :: IO x -> IO (Either SomeException x)
 try' = try
 
+getFileStatus' :: FilePath -> IO (System.Posix.Types.EpochTime, System.Posix.Types.EpochTime)
 getFileStatus' fp = do
     efs <- try' $ getFileStatus fp
     case efs of
diff --git a/yesod/Scaffold/Devel.hs b/yesod/Scaffold/Devel.hs
index 3ba599bd..87e1b00d 100644
--- a/yesod/Scaffold/Devel.hs
+++ b/yesod/Scaffold/Devel.hs
@@ -20,12 +20,12 @@ import Scaffold.Build (getDeps, touchDeps, findHaskellFiles)
 -- import Distribution.Simple.Install (install)
 -- import Distribution.Simple.Register (register)
 import Control.Concurrent (forkIO, threadDelay, ThreadId, killThread)
-import Control.Exception (try, SomeException, finally)
+import Control.Exception (try, SomeException)
 import System.PosixCompat.Files (modificationTime, getFileStatus)
 import qualified Data.Map as Map
 import System.Posix.Types (EpochTime)
-import Blaze.ByteString.Builder.Char.Utf8 (fromString)
-import Network.Wai (Application, Response (ResponseBuilder), responseLBS)
+-- import Blaze.ByteString.Builder.Char.Utf8 (fromString)
+-- import Network.Wai (Application, Response (ResponseBuilder), responseLBS)
 -- import Network.HTTP.Types (status500)
 import Control.Monad (when, forever)
 import System.Process (runCommand, terminateProcess, waitForProcess)