input-types.t: don't litter ./tests/

2021-02-23 21:42:59 -05:00
parent 611d7b71f2
commit cccdc70162
2 changed files with 19 additions and 13 deletions
--- a/tests/lib/Setup.pm
+++ b/tests/lib/Setup.pm
@ -115,8 +115,11 @@ sub runBuild {
 }

 sub updateRepository {
-    my ($scm, $update) = @_;
+    my ($scm, $update, $scratchdir) = @_;
+    my $curdir = getcwd;
+    chdir "$scratchdir";
    my ($res, $stdout, $stderr) = captureStdoutStderr(60, ($update, $scm));
+    chdir "$curdir";
    die "unexpected update error with $scm: $stderr\n" if $res;
    my ($message, $loop, $status) = $stdout =~ m/::(.*) -- (.*) -- (.*)::/;
    print STDOUT "Update $scm repository: $message\n";