diff --git a/integration/test/Testlib/ModService.hs b/integration/test/Testlib/ModService.hs
index 8c95b85aecd..1169c94e3a8 100644
--- a/integration/test/Testlib/ModService.hs
+++ b/integration/test/Testlib/ModService.hs
@@ -409,7 +409,7 @@ cleanupService :: (HasCallStack) => String -> ServiceInstance -> IO ()
 cleanupService logPrefix inst = do
   mPid <- getPid inst.handle
   for_ mPid (signalProcess keyboardSignal)
-  timeout 50000 (waitForProcess inst.handle) >>= \case
+  timeout 1_000_000 (waitForProcess inst.handle) >>= \case
     Just _ ->
       putStrLn $ logPrefix <> " is dead"
     Nothing -> do