diff options
author | Profpatsch <mail@profpatsch.de> | 2024-05-11T18·18+0200 |
---|---|---|
committer | clbot <clbot@tvl.fyi> | 2024-05-13T14·45+0000 |
commit | ba1eb4dc00a94670d33ceef5829506efb08e2937 (patch) | |
tree | e04df529a7981c988418896cc517f34f9fd07216 /users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs | |
parent | dcd621820a84d1e8cb6a5465f6797d5c8755b6bb (diff) |
refactor(users/Profpatsch/whatcd-resolver): remove all debug r/8124
Change-Id: I6b3d26df05d2370ea86ecbacfe21508ebfe89fa6 Reviewed-on: https://cl.tvl.fyi/c/depot/+/11643 Autosubmit: Profpatsch <mail@profpatsch.de> Reviewed-by: Profpatsch <mail@profpatsch.de> Tested-by: BuildkiteCI
Diffstat (limited to 'users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs')
-rw-r--r-- | users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs b/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs index d5dc5161f4e1..d8873ebb5760 100644 --- a/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs +++ b/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs @@ -75,7 +75,6 @@ main = htmlUi :: AppT IO () htmlUi = do - let debug = True uniqueRunId <- runTransaction $ querySingleRowWith @@ -231,7 +230,6 @@ htmlUi = do ] runInIO $ runHandlers - debug (\respond -> respond.html $ (mainHtml uniqueRunId)) handlers req @@ -308,13 +306,12 @@ data HandlerResponses m = HandlerResponses runHandlers :: (MonadOtel m) => - Bool -> (HandlerResponses m -> m ResponseReceived) -> (HandlerResponses m -> Map Text (m ResponseReceived)) -> Wai.Request -> (Wai.Response -> IO ResponseReceived) -> m ResponseReceived -runHandlers debug defaultHandler handlers req respond = withRunInIO $ \runInIO -> do +runHandlers defaultHandler handlers req respond = withRunInIO $ \runInIO -> do let hh route act = Otel.inSpan' [fmt|Route {route}|] |