@@ -234,7 +234,7 @@ detailedMiddleware' cb getAddColor app req = do
234 liftIO $ cb $ mconcat $ map toLogStr $ addColor (requestMethod req) ++
234 liftIO $ cb $ mconcat $ map toLogStr $ addColor (requestMethod req) ++
236 , rawPathInfo req
236 , rawPathInfo req
237− , " | "
237+ , " :: "
239 , paramsToBS "GET " getParams
239 , paramsToBS "GET " getParams
240 , paramsToBS "POST " postParams
240 , paramsToBS "POST " postParams