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

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2011-03-19 23:34:35 +0000 (Sat, 19 Mar 2011)
New Revision: 9838

Modified:
   Class-C3-Componentised/trunk/Changes
   Class-C3-Componentised/trunk/lib/Class/C3/Componentised.pm
Log:
Stop importing Carp functions

Modified: Class-C3-Componentised/trunk/Changes
===================================================================
--- Class-C3-Componentised/trunk/Changes	2011-03-19 10:24:44 UTC (rev 9837)
+++ Class-C3-Componentised/trunk/Changes	2011-03-19 23:34:35 UTC (rev 9838)
@@ -1,5 +1,8 @@
 Revision history for Class-C3-Componentised
 
+        Stop importing Carp functions (and thus polluting the inheritor
+        namespaces)
+
 1.0008   24 Feb 2011
         Fix inject_base regression introduced during optimizations in
         1.0007

Modified: Class-C3-Componentised/trunk/lib/Class/C3/Componentised.pm
===================================================================
--- Class-C3-Componentised/trunk/lib/Class/C3/Componentised.pm	2011-03-19 10:24:44 UTC (rev 9837)
+++ Class-C3-Componentised/trunk/lib/Class/C3/Componentised.pm	2011-03-19 23:34:35 UTC (rev 9838)
@@ -47,7 +47,7 @@
 # Therefore leaving it in indefinitely.
 use MRO::Compat;
 
-use Carp;
+use Carp ();
 
 our $VERSION = 1.0008;
 
@@ -151,7 +151,7 @@
     if ($class->can('throw_exception')) {
       $class->throw_exception($@);
     } else {
-      croak $@;
+      Carp::croak $@;
     }
   };