better thread name

yesodweb · Oct 30, 2024 · b6bc2b6 · b6bc2b6
1 parent 6688846
commit b6bc2b6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/time-manager/System/TimeManager.hs b/time-manager/System/TimeManager.hs
@@ -61,7 +61,7 @@ initialize timeout =
         defaultReaperSettings
             { reaperAction = mkListAction prune
             , reaperDelay = timeout
-            , reaperThreadName = "TimeManager (Reaper)"
+            , reaperThreadName = "WAI timeout manager (Reaper)"
             }
   where
     prune m@(Handle _ actionRef stateRef) = do