Avoid package qualification of $windows_os
authorAndrew Dunstan <andrew@dunslane.net>
Thu, 1 Feb 2024 20:17:41 +0000 (15:17 -0500)
committerAndrew Dunstan <andrew@dunslane.net>
Thu, 1 Feb 2024 20:19:56 +0000 (15:19 -0500)
Further fallout from commit 6ee26c6a4b. To keep code in sync and avoid
issues on older releases with different package names, simply use the
unqualified name like many other places in our code.

src/bin/pg_rewind/t/003_extrafiles.pl

index 7e4c2771ce7d6f4288c8c8c2d833a2ac3cedee3f..bab4b73d31ffd18db4f295c40c6e2b495a48c67e 100644 (file)
@@ -82,7 +82,7 @@ sub run_test
        # File::Find converts backslashes to slashes in the newer Perl
        # versions. To support all Perl versions, do the same conversion
        # for Windows before comparing the paths.
-       if ($PostgreSQL::Test::Utils::windows_os)
+       if ($windows_os)
        {
                for my $filename (@paths)
                {