@@ -50,7 +50,7 @@ runServer = do
51policy :: CorsResourcePolicy
51policy :: CorsResourcePolicy
52policy = CorsResourcePolicy {
52policy = CorsResourcePolicy {
53− corsOrigins=Nothing,
53+ corsOrigins = Just (["http://localhost:8080", "http://localhost:4000", "http://127.0.0.1:4000", "http://127.0.0.1:8080", "http://lvh.me:4000", "http://lvh.me:8080"], True), -- Nothing,
54 corsMethods=[methodGet, methodPost],
54 corsMethods=[methodGet, methodPost],
55 corsRequestHeaders = ["content-type"],
55 corsRequestHeaders = ["content-type"],
56 corsExposedHeaders = Nothing,
56 corsExposedHeaders = Nothing,