Do not call component_base_class unless it is actually necessary

[p5sagit/Class-C3-Componentised.git] / t / lib / MyModule.pm

diff --git a/t/lib/MyModule.pm b/t/lib/MyModule.pm
index 3aa04a3..f7dae37 100644 (file)
--- a/t/lib/MyModule.pm
+++ b/t/lib/MyModule.pm
@@ -8,7 +8,7 @@ sub component_base_class { "MyModule::Plugin" }
 sub message { 
   my $msg = $_[0]->maybe::next::method() || '';
   
-  return $msg . " MyModule";
+  return $msg . ' ' . __PACKAGE__;
 }
 
 sub new {