Add CORS

Application.hs

@@ -28,6 +28,7 @@ import Network.Wai.Middleware.RequestLogger (Destination (Logger),
                                              IPAddrSource (..),
                                              OutputFormat (..), destination,
                                              mkRequestLogger, outputFormat)
+import Network.Wai.Middleware.Cors
 import System.Log.FastLogger                (defaultBufSize, newStdoutLoggerSet,
                                              toLogStr)
 
@@ -145,7 +146,7 @@ makeApplication foundation = do
 
     -- Create the WAI application and apply middlewares
     appPlain <- toWaiAppPlain foundation
-    return $ logWare $ defaultMiddlewaresNoLogging appPlain
+    return $ logWare $ defaultMiddlewaresNoLogging $ simpleCors appPlain
 
 makeLogWare :: App -> IO Middleware
 makeLogWare foundation =

gonito.cabal

@@ -151,6 +151,7 @@ library
                  , megaparsec
                  , Glob
                  , req
+                 , wai-cors
 
 executable         gonito
     if flag(library-only)