pg_validatebackup: Also use perl2host in TAP tests.

Second try at getting the buildfarm to be happy with 003_corrution.pl
as added by commit 0d8c9c1210c44b36ec2efcb223a1dfbe897a3661.

Per suggestion from Álvaro Herrera.

Discussion: http://postgr.es/m/20200403205412.GA8279@alvherre.pgsql

diff --git a/src/bin/pg_validatebackup/t/003_corruption.pl b/src/bin/pg_validatebackup/t/003_corruption.pl
index 0a1533bd61b2b43ccf5dec422ebfeb4c2b953fc9..416bc9194f053bd03bd5183ad2155821a631b87b 100644 (file)
--- a/src/bin/pg_validatebackup/t/003_corruption.pl
+++ b/src/bin/pg_validatebackup/t/003_corruption.pl
@@ -15,7 +15,7 @@ $master->start;
 
 # Include a user-defined tablespace in the hopes of detecting problems in that
 # area.
-my $source_ts_path = TestLib::tempdir_short;
+my $source_ts_path = TestLib::perl2host(TestLib::tempdir_short());
 $master->safe_psql('postgres', <<EOM);
 CREATE TABLE x1 (a int);
 INSERT INTO x1 VALUES (111);
@@ -103,7 +103,7 @@ for my $scenario (@scenario)
 
        # Take a backup and check that it validates OK.
        my $backup_path = $master->backup_dir . '/' . $name;
-       my $backup_ts_path = TestLib::tempdir_short;
+       my $backup_ts_path = TestLib::perl2host(TestLib::tempdir_short());
        $master->command_ok(['pg_basebackup', '-D', $backup_path, '--no-sync',
                            '-T', "${source_ts_path}=${backup_ts_path}"],
                            "base backup ok");