about summary refs log tree commit diff
path: root/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs
diff options
context:
space:
mode:
authorProfpatsch <mail@profpatsch.de>2024-05-11T18·18+0200
committerclbot <clbot@tvl.fyi>2024-05-13T14·45+0000
commitba1eb4dc00a94670d33ceef5829506efb08e2937 (patch)
treee04df529a7981c988418896cc517f34f9fd07216 /users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs
parentdcd621820a84d1e8cb6a5465f6797d5c8755b6bb (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.hs5
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}|]