From: Ash Berlin Date: Thu, 6 Mar 2008 01:00:41 +0000 (+0000) Subject: Fix for 5.10/Carp 1.08 upwards. Ugh X-Git-Tag: v1.001000~30 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4a196a90116e3209994ffe0577e7dd08582e7311;p=p5sagit%2FClass-C3-Componentised.git Fix for 5.10/Carp 1.08 upwards. Ugh --- diff --git a/Changes b/Changes index d69377d..dfb4c36 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,8 @@ Revision history for Class-C3-Componentised +1.0003 5 Mar 2008 + Fix tests on perl 5.10.0 + 1.0002 4 Mar 2008 Make tests more resilient diff --git a/lib/Class/C3/Componentised.pm b/lib/Class/C3/Componentised.pm index 1cbbe13..ed0ac41 100644 --- a/lib/Class/C3/Componentised.pm +++ b/lib/Class/C3/Componentised.pm @@ -44,7 +44,7 @@ use Class::C3; use Class::Inspector; use Carp; -our $VERSION = 1.0001; +our $VERSION = 1.0003; =head2 load_components( @comps ) diff --git a/t/01-basic.t b/t/01-basic.t index ca06d35..8c3d5cb 100644 --- a/t/01-basic.t +++ b/t/01-basic.t @@ -16,7 +16,8 @@ MyModule->load_components('Foo'); # Clear down inc so ppl dont mess us up with installing modules that we # expect not to exist -@INC = (); +#@INC = (); +# This breaks Carp1.08/perl 5.10.0; bah throws_ok { MyModule->load_components('+ClassC3ComponentFooThatShouldntExist'); } qr/^Can't locate ClassC3ComponentFooThatShouldntExist.pm in \@INC/;