foo
[gitmo/Moose-Autobox.git] / t / 003_p6_example.t
index 273e478..054f966 100644 (file)
@@ -19,7 +19,7 @@ This comes from one of the examples in the Pugs distro.
 {
     package Units::Bytes;
     use Moose::Role;
-    use autobox;
+    use Moose::Autobox;
     
     sub bytes     { $_[0]                   }    
     sub kilobytes { $_[0] * 1024            }
@@ -38,8 +38,8 @@ This comes from one of the examples in the Pugs distro.
 }
 
 {
-    package SCALAR;
-    use Moose;
+    package Moose::Autobox::SCALAR;
+    use Moose 'with';
     with 'Units::Bytes';
 }
 
@@ -48,7 +48,7 @@ sub testing_bytes {
 }
 
 {
-    use autobox;
+    use Moose::Autobox;
 
     is(5->bytes,     5,             '... got 5 bytes');
     is(5->kilobytes, 5120,          '... got 5 kilobytes');