diff --git a/R/app-process.R b/R/app-process.R
index a7ac576..924bdef 100644
--- a/R/app-process.R
+++ b/R/app-process.R
@@ -89,7 +89,7 @@ new_app_process <- function(app, port = NULL,
   process_timeout <- process_timeout %||%
     as.integer(Sys.getenv(
       "R_WEBFAKES_PROCESS_TIMEOUT",
-      if (Sys.getenv("R_COVR") == "true") 30000 else 5000
+      if (Sys.getenv("R_COVR") == "true") 600000 else 5000
     ))
 
   self <- new_object(