diff --git a/yesod-bin/HsFile.hs b/yesod-bin/HsFile.hs
index f7567c64..fa56b6c3 100644
--- a/yesod-bin/HsFile.hs
+++ b/yesod-bin/HsFile.hs
@@ -9,14 +9,13 @@ import Control.Monad.Trans.Resource (ResourceT, runResourceT)
 import qualified Data.Conduit.List as CL
 import qualified Data.ByteString as BS
 import Control.Monad.IO.Class (liftIO)
+import Data.String (fromString)
 
 mkHsFile :: IO ()
 mkHsFile = runResourceT $ sourceDirectory "."
         $$ readIt
         =$ createTemplate 
         =$ awaitForever (liftIO . BS.putStr)
-
--- Reads a filepath from upstream and dumps a pair of (filepath, filecontents)
-readIt :: ConduitM FilePath (FilePath, ResourceT IO BS.ByteString) (ResourceT IO) ()
-readIt = CL.map $ \i -> (i, liftIO $ BS.readFile i)
-
+  where
+    -- Reads a filepath from upstream and dumps a pair of (filepath, filecontents)
+    readIt = CL.map $ \i -> (fromString i, liftIO $ BS.readFile i)
diff --git a/yesod-bin/yesod-bin.cabal b/yesod-bin/yesod-bin.cabal
index 69d7832e..2222407f 100644
--- a/yesod-bin/yesod-bin.cabal
+++ b/yesod-bin/yesod-bin.cabal
@@ -1,5 +1,5 @@
 name:            yesod-bin
-version:         1.4.9
+version:         1.4.9.1
 license:         MIT
 license-file:    LICENSE
 author:          Michael Snoyman <michael@snoyman.com>