From: Artur Bergman Date: Tue, 18 Sep 2001 18:49:03 +0000 (+0000) Subject: Fixes test case failure introduced by #12071, the warning is X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=87e7c081d2a6d855cf78d04628acebc398a72b7e;p=p5sagit%2Fp5-mst-13.2.git Fixes test case failure introduced by #12071, the warning is now correctly spelled :-) p4raw-id: //depot/perl@12074 --- diff --git a/ext/IO/lib/IO/t/io_sel.t b/ext/IO/lib/IO/t/io_sel.t index 84660db..1426b76 100755 --- a/ext/IO/lib/IO/t/io_sel.t +++ b/ext/IO/lib/IO/t/io_sel.t @@ -118,7 +118,7 @@ print "ok 21\n"; # check warnings $SIG{__WARN__} = sub { ++ $w - if $_[0] =~ /^Call to depreciated method 'has_error', use 'has_exception'/ + if $_[0] =~ /^Call to deprecated method 'has_error', use 'has_exception'/ } ; $w = 0 ; IO::Select::has_error();