From: Paul Green <Paul.Green@stratus.com>
Date: Wed, 15 Feb 2006 11:09:57 +0000 (-0500)
Subject: [patch] t/lib/warnings/pp_sys
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ce712ebb95d183e83e7dbbf4bab54d46504ec362;p=p5sagit%2Fp5-mst-13.2.git

[patch] t/lib/warnings/pp_sys
From: "Green, Paul" <Paul.Green@stratus.com>
Message-ID: <F5F42E77A43DD944B6D664B00A5401CB011A19AF@EXNA.corp.stratus.com>

p4raw-id: //depot/perl@27199
---

diff --git a/t/lib/warnings/pp_sys b/t/lib/warnings/pp_sys
index a358819..173d0d8 100644
--- a/t/lib/warnings/pp_sys
+++ b/t/lib/warnings/pp_sys
@@ -452,9 +452,9 @@ getc() on closed filehandle FH2 at - line 12.
 # pp_sys.c [pp_sselect]
 use warnings 'misc';
 $x = 1;
-select $x, undef, undef, undef;
+select $x, undef, undef, 1;
 no warnings 'misc';
-select $x, undef, undef, undef;
+select $x, undef, undef, 1;
 EXPECT
 Non-string passed as bitmask at - line 4.
 ########