This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Correct parentheses. Calling Win32::GetOSVersion() on non-win32 would
authorNicholas Clark <nick@ccl4.org>
Thu, 16 Aug 2007 11:14:34 +0000 (11:14 +0000)
committerNicholas Clark <nick@ccl4.org>
Thu, 16 Aug 2007 11:14:34 +0000 (11:14 +0000)
be bad, m'kay.

p4raw-id: //depot/perl@31725

ext/POSIX/t/posix.t

index 93e2602..2da3b43 100644 (file)
@@ -188,9 +188,9 @@ $lc = &POSIX::setlocale(&POSIX::LC_TIME, 'C') if $Config{d_setlocale};
 try_strftime("Wed Feb 28 00:00:00 1996 059", 0,0,0, 28,1,96);
 SKIP: {
     skip("VC++ 8 and Vista's CRTs regard 60 seconds as an invalid parameter", 1)
-       if ($Is_W32 and ($Config{cc} eq 'cl' and
+       if ($Is_W32 and (($Config{cc} eq 'cl' and
                         $Config{ccversion} =~ /^(\d+)/ and $1 >= 14) or
-                       ((Win32::GetOSVersion())[1] >= 6));
+                        (Win32::GetOSVersion())[1] >= 6));
 
     try_strftime("Thu Feb 29 00:00:60 1996 060", 60,0,-24, 30,1,96);
 }