diff options
-rw-r--r-- | photos.cabal | 1 | ||||
-rw-r--r-- | src/Main.hs | 3 |
2 files changed, 3 insertions, 1 deletions
diff --git a/photos.cabal b/photos.cabal index 2dd843e..f953328 100644 --- a/photos.cabal +++ b/photos.cabal @@ -26,6 +26,7 @@ executable photos , aeson , warp , wai + , wai-extra , hflags , directory , transformers diff --git a/src/Main.hs b/src/Main.hs index 3eed3cc..fcdf9ea 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -18,6 +18,7 @@ import Data import PhotoStore import Control.Monad.IO.Class import Control.Monad.Trans.Either +import Network.Wai.Middleware.RequestLogger defineFlag "port" (8081 :: Int) "Port to serve on" defineFlag "host" ("*6" :: String) "Host to serve on (*6 for ipv6 mode)" @@ -63,7 +64,7 @@ photoApi :: Proxy PhotoApi photoApi = Proxy app :: Application -app = serve photoApi server +app = logStdoutDev $ serve photoApi server port = 8081 settings :: Settings |