On Fri, Aug 13, 2004 at 02:29:40PM +0200, Rafael Garcia-Suarez ([EMAIL PROTECTED])
wrote:
> Andy Lester wrote:
> > #./perl -T
> ^^
> the lack of "!" here gave me a small headache during the integration.
Sorry about that. Here's one teeny more patch to add, to minimize the
amount of silencing we do.
xoxo,
Andy
--- t/comp/opsubs.t.orig 2004-08-13 09:40:54.000000000 -0500
+++ t/comp/opsubs.t 2004-08-13 09:45:00.000000000 -0500
@@ -26,8 +26,8 @@
# m operator
can_ok( 'main', "m" );
-SILENCE_WARNING: { # Complains because $_ is undef
- no warnings;
+SILENCE_WARNING: {
+ no warnings 'uninitialized'; # m// complains because $_ is uninitialized
isnt( m('unqualified'), "m-unqualified", "m('unqualified') is oper" );
}
is( main::m('main'), "m-main", "main::m() is func" );
--
Andy Lester => [EMAIL PROTECTED] => www.petdance.com => AIM:petdance
