Unbreak pg_verifybackup/t/008_untar.pl on msys
authorAndrew Dunstan <andrew@dunslane.net>
Mon, 24 Jan 2022 21:32:16 +0000 (16:32 -0500)
committerAndrew Dunstan <andrew@dunslane.net>
Mon, 24 Jan 2022 21:32:16 +0000 (16:32 -0500)
Commit 0ad8032910 contains the same pattern fixed in commit 4f0bcc7350.
Apply the same fix.

src/bin/pg_verifybackup/t/008_untar.pl

index 1d74a418865052afcd4c4b615ac358e5149b0e20..aad7568b659cf37c7d5ee7ed8783d6402aaafe1a 100644 (file)
@@ -19,6 +19,7 @@ $primary->start;
 
 my $have_zlib = check_pg_config("#define HAVE_LIBZ 1");
 my $backup_path = $primary->backup_dir . '/server-backup';
+my $real_backup_path = PostgreSQL::Test::Utils::perl2host($backup_path);
 my $extract_path = $primary->backup_dir . '/extracted-backup';
 
 my @test_configuration = (
@@ -52,7 +53,7 @@ for my $tc (@test_configuration)
                # Take a server-side backup.
                my @backup = (
                        'pg_basebackup', '--no-sync', '-cfast', '--target',
-                       "server:$backup_path", '-Xfetch'
+                       "server:$real_backup_path", '-Xfetch'
                );
                push @backup, @{$tc->{'backup_flags'}};
                $primary->command_ok(\@backup,