diff options
| author | Paul Green <Paul.Green@stratus.com> | 2006-02-15 06:09:57 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-02-16 11:43:09 +0000 |
| commit | ce712ebb95d183e83e7dbbf4bab54d46504ec362 (patch) | |
| tree | 1b10ee3ef67f448e17659b57827fb657a9bc0f5a /t/lib | |
| parent | 77fac9647447c87a596e9746a6031e1ce4ee2607 (diff) | |
| download | perl-ce712ebb95d183e83e7dbbf4bab54d46504ec362.tar.gz | |
[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
Diffstat (limited to 't/lib')
| -rw-r--r-- | t/lib/warnings/pp_sys | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/lib/warnings/pp_sys b/t/lib/warnings/pp_sys index a358819240..173d0d85eb 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. ######## |