diff options
Diffstat (limited to 'Run/Que/Server.hs')
| -rw-r--r-- | Run/Que/Server.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Run/Que/Server.hs b/Run/Que/Server.hs index fe88014..e30a96a 100644 --- a/Run/Que/Server.hs +++ b/Run/Que/Server.hs @@ -34,7 +34,7 @@ import qualified Network.Socket as Socket import qualified Network.Wai as Wai import qualified Network.Wai.Handler.Warp as Warp import Network.Wai.Middleware.RequestLogger - ( logStdoutDev ) + ( logStdout ) import qualified System.Console.GetOpt as Opt import qualified System.Environment as Environment import qualified Web.Scotty.Trans as Scotty @@ -78,7 +78,7 @@ guardIP r = case Wai.remoteHost r of routes :: Scotty.ScottyT Text App () routes = do - Scotty.middleware logStdoutDev + Scotty.middleware logStdout let quepath = "^/([[:alnum:]_]*)/([[:alnum:]._/]*)$" let namespace = "^/([[:alnum:]_]*)/?$" -- matches '/ns' and '/ns/' but not '/ns/path' |