Convert a pp_sys test to use warnings 'closed', instead of the broader 'io'.
authorNicholas Clark <nick@ccl4.org>
Thu, 30 Dec 2010 17:14:15 +0000 (17:14 +0000)
committerNicholas Clark <nick@ccl4.org>
Thu, 30 Dec 2010 17:14:15 +0000 (17:14 +0000)
It's actually only testing warnings enabled by 'closed', so test using the
tighter category.

t/lib/warnings/pp_sys

index 62e47c1..b278306 100644 (file)
@@ -291,7 +291,7 @@ flock() on unopened filehandle FOO at - line 19.
 flock() on unopened filehandle at - line 20.
 ########
 # pp_sys.c [pp_prtf pp_send pp_bind pp_connect pp_listen pp_accept pp_shutdown pp_ssockopt ppp_getpeername]
-use warnings 'io' ;
+use warnings 'closed';
 use Config; 
 BEGIN { 
   if ( $^O ne 'VMS' and ! $Config{d_socket}) {
@@ -333,7 +333,7 @@ getsockopt STDIN, 1,2;
 getsockname STDIN;
 getpeername STDIN;
 closedir STDIN;
-no warnings 'io' ;
+no warnings 'closed';
 send STDIN, "fred", 1;
 bind STDIN, "fred" ;
 connect STDIN, "fred" ;