Testing: Break out srcdump-prep

[cgi-auth-flexible.git] / tests / autotest

diff --git a/tests/autotest b/tests/autotest
index 4737b1ef7c39c98853d956bf8621350645ead529..4fc506835f9dc6365ccbb70b5944187160f3aabe 100755 (executable)
--- a/tests/autotest
+++ b/tests/autotest
@@ -98,6 +98,12 @@ proc loginas {user {password sesame} {wanttxt ACCESSGRANTED}} {
      submitform-expect $wanttxt
 }
 
      submitform-expect $wanttxt
 }
 

+proc srcdump-prep {} {
+    global timeout env
+    set env(CAFTEST_NOSRCDUMP) 0
+    set timeout [expr {$timeout * 3}]
+}
+

 proc srcdump-save-check {} {
     global tt
     global outertar sd files
 proc srcdump-save-check {} {
     global tt
     global outertar sd files