On Wed, Aug 30, 2006 at 02:41:53PM +0400, QA Team Robot wrote: > Package: perl-Class-Autouse-1.20-alt1 > Packager: Vitaly Lipatov > PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'inc', 'blib/lib', 'blib/arch')" t/00_compile.t t/01_main.t t/02_parent.t t/03_prefork.t t/04_recursive.t t/99_pod.t > t/00_compile......ok > t/01_main......... (in cleanup) This is an expected error at modules/I.pm line 5. > > # Failed test 'Bad existant ->can throws the expected error' > # in t/01_main.t at line 134. > # ' (in cleanup) This is an expected error at modules/I.pm line 5. > # Compilation failed in require at /usr/src/RPM/BUILD/Class-Autouse-1.20/blib/lib/Class/Autouse.pm line 380. > # at /usr/src/RPM/BUILD/Class-Autouse-1.20/blib/lib/Class/Autouse.pm line 333 > # eval {...} called at /usr/src/RPM/BUILD/Class-Autouse-1.20/blib/lib/Class/Autouse.pm line 333 > # Class::Autouse::_can('I', 'foo') called at t/01_main.t line 132 > # eval {...} called at t/01_main.t line 131 > # ' > # doesn't match '(?-xism:^This is an expected error)' > # Looks like you failed 1 test of 26. > dubious > Test returned status 1 (wstat 256, 0x100) > DIED. FAILED test 25 --- Class-Autouse-1.20/t/01_main.t- 2005-08-18 05:29:44 +0400 +++ Class-Autouse-1.20/t/01_main.t 2006-09-01 03:24:39 +0400 @@ -131,5 +131,5 @@ $coderef = 'foobar'; eval { $coderef = I->can('foo'); }; -like( $@, qr/^This is an expected error/, 'Bad existant ->can throws the expected error' ); +like( $@, qr/This is an expected error/, 'Bad existant ->can throws the expected error' ); is( $coderef, 'foobar', 'Assigned value from autoloading ->can remains unchanged' );