diff --git a/src/Application.hs b/src/Application.hs index 0da706a22..83a229d82 100644 --- a/src/Application.hs +++ b/src/Application.hs @@ -298,8 +298,6 @@ makeApplication foundation = liftIO $ do -- Create the WAI application and apply middlewares appPlain <- toWaiAppPlain foundation return . observeHTTPRequestLatency classifyHandler . logWare $ defaultMiddlewaresNoLogging appPlain - where - makeLogWare :: MonadIO m => UniWorX -> m Middleware makeLogWare app = do