diff --git a/Yesod/Routes/Flow/Generator.hs b/Yesod/Routes/Flow/Generator.hs
--- a/Yesod/Routes/Flow/Generator.hs
+++ b/Yesod/Routes/Flow/Generator.hs
@@ -3,12 +3,13 @@
     , genFlowRoutes
     ) where
 
-import ClassyPrelude
+import ClassyPrelude hiding (FilePath)
 import Data.List (nubBy)
 import Data.Function (on)
 import Data.Text (dropWhileEnd)
 import qualified Data.Text as DT
-import Filesystem (createTree)
+import Filesystem (createTree, writeTextFile)
+import Filesystem.Path (FilePath, directory)
 import qualified Data.Char as DC
 import Yesod.Routes.TH.Types
     -- ( ResourceTree(..),
@@ -24,7 +25,7 @@
 genFlowRoutesPrefix :: [String] -> [String] -> [ResourceTree String] -> FilePath -> Text -> IO ()
 genFlowRoutesPrefix routePrefixes elidedPrefixes resourcesApp fp prefix = do
     createTree $ directory fp
-    writeFile fp routesCs
+    writeTextFile fp routesCs
   where
     routesCs =
         let res = (resToCoffeeString Nothing "" $ ResourceParent "paths" False [] hackedTree)
diff --git a/yesod-routes-flow.cabal b/yesod-routes-flow.cabal
--- a/yesod-routes-flow.cabal
+++ b/yesod-routes-flow.cabal
@@ -1,5 +1,5 @@
 name:                yesod-routes-flow
-version:             1.0
+version:             1.0.1
 synopsis:            Generate Flow routes for Yesod
 description:         Parse the Yesod routes data structure and generate routes that can be used with Flow.
 homepage:            https://github.com/frontrowed/yesod-routes-flow
@@ -37,6 +37,7 @@
                         base < 5,
                         classy-prelude >= 0.7,
                         system-fileio,
+                        system-filepath >= 0.4,
                         text,
                         yesod-core >= 1.4 && < 2.0
   -- hs-source-dirs: