[Bast-commits] r4141 - in trunk/Class-C3-Componentised: . lib/Class/C3 t

[ash at dev.catalyst.perl.org]

Author: ash
Date: 2008-03-06 01:00:41 +0000 (Thu, 06 Mar 2008)
New Revision: 4141

Modified:
   trunk/Class-C3-Componentised/Changes
   trunk/Class-C3-Componentised/lib/Class/C3/Componentised.pm
   trunk/Class-C3-Componentised/t/01-basic.t
Log:
Fix for 5.10/Carp 1.08 upwards. Ugh

Modified: trunk/Class-C3-Componentised/Changes
===================================================================
--- trunk/Class-C3-Componentised/Changes	2008-03-05 15:11:13 UTC (rev 4140)
+++ trunk/Class-C3-Componentised/Changes	2008-03-06 01:00:41 UTC (rev 4141)
@@ -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
 

Modified: trunk/Class-C3-Componentised/lib/Class/C3/Componentised.pm
===================================================================
--- trunk/Class-C3-Componentised/lib/Class/C3/Componentised.pm	2008-03-05 15:11:13 UTC (rev 4140)
+++ trunk/Class-C3-Componentised/lib/Class/C3/Componentised.pm	2008-03-06 01:00:41 UTC (rev 4141)
@@ -44,7 +44,7 @@
 use Class::Inspector;
 use Carp;
 
-our $VERSION = 1.0001;
+our $VERSION = 1.0003;
 
 =head2 load_components( @comps )
 

Modified: trunk/Class-C3-Componentised/t/01-basic.t
===================================================================
--- trunk/Class-C3-Componentised/t/01-basic.t	2008-03-05 15:11:13 UTC (rev 4140)
+++ trunk/Class-C3-Componentised/t/01-basic.t	2008-03-06 01:00:41 UTC (rev 4141)
@@ -16,7 +16,8 @@
 
 # Clear down inc so ppl dont mess us up with installing modules that we
 # expect not to exist
- at 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/;