summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
84f9fce)
Remove a bit more of this boilerplate.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
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
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU Affero General Public License for more details.
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU Affero General Public License for more details.
-set env(CAFTEST_NOSRCDUMP) 0
-
-set timeout [expr {$timeout * 3}]
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU Affero General Public License for more details.
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU Affero General Public License for more details.
-set env(CAFTEST_NOSRCDUMP) 0
-
-set timeout [expr {$timeout * 3}]