Class::MOP - moving things from t/lib to examples/
Stevan Little [Fri, 3 Feb 2006 01:12:50 +0000 (01:12 +0000)]
examples/InsideOutClass.pm [moved from t/lib/InsideOutClass.pm with 100% similarity]
examples/InstanceCountingClass.pm [moved from t/lib/CountingClass.pm with 92% similarity]
t/101_InstanceCountingClass_test.t [moved from t/101_CountingClass_test.t with 91% similarity]
t/102_InsideOutClass_test.t

similarity index 92%
rename from t/lib/CountingClass.pm
rename to examples/InstanceCountingClass.pm
index 36935ff..75de0db 100644 (file)
@@ -1,5 +1,5 @@
 
-package CountingClass;
+package InstanceCountingClass;
 
 use strict;
 use warnings;
similarity index 91%
rename from t/101_CountingClass_test.t
rename to t/101_InstanceCountingClass_test.t
index 0029e5c..e47ab1b 100644 (file)
@@ -7,7 +7,7 @@ use Test::More tests => 12;
 
 BEGIN { 
     use_ok('Class::MOP');    
-    use_ok('t::lib::CountingClass');
+    use_ok('examples::InstanceCountingClass');
 }
 
 =pod
@@ -22,7 +22,7 @@ a simple demonstration of how to make a metaclass.
 {
     package Foo;
     
-    sub meta { CountingClass->initialize($_[0]) }
+    sub meta { InstanceCountingClass->initialize($_[0]) }
     sub new  {
         my $class = shift;
         bless $class->meta->construct_instance() => $class;
index 06a4c4e..f73eef4 100644 (file)
@@ -7,7 +7,7 @@ use Test::More no_plan => 2;
 
 BEGIN { 
     use_ok('Class::MOP');    
-    use_ok('t::lib::InsideOutClass');
+    use_ok('examples::InsideOutClass');
 }
 
 {