diff options
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
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 |