Merge pull request #46 from circuithub/master

Allow building with recent GHCs (eg, 9.12)

Author: nuttycom

src/Database/Schema/Migrations/Filesystem.hs

@@ -156,7 +156,7 @@ instance ToJSON UTCTimeYaml where
 
 -- Keeps things as the old Show/Read-based format, e.g "2009-04-15 10:02:06 UTC"
 utcTimeYamlFormat :: String
-utcTimeYamlFormat = "%F %T UTC"
+utcTimeYamlFormat = "%F %T%Q UTC"
 
 newtype DependsYaml = DependsYaml
     { unDependsYaml :: [Text]

src/Moo/Main.hs

@@ -10,7 +10,8 @@ module Moo.Main
     )
 where
 
-import  Control.Monad.Reader (forM_, runReaderT, when)
+import  Control.Monad (forM_, when)
+import  Control.Monad.Reader (runReaderT)
 import  Database.HDBC (SqlError, catchSql, seErrorMsg)
 import  Prelude  hiding (lookup)
 import  Data.Text (Text)