Require the latest CMOP
[gitmo/Moose.git] / t / 100_bugs / 001_subtype_quote_bug.t
index f01d168..fa16554 100644 (file)
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 1;
+use Test::More;
 
 =pod
 
@@ -13,19 +13,24 @@ The code:
   subtype Stuff
     => as Object
     => where { ... }
-  
-will break if the Object:: namespace exists. So the 
+
+will break if the Object:: namespace exists. So the
 solution is to quote 'Object', like so:
 
   subtype Stuff
     => as 'Object'
     => where { ... }
 
-Moose 0.03 did this, now it doesn't, so all should 
-be well from now on. 
+Moose 0.03 did this, now it doesn't, so all should
+be well from now on.
 
 =cut
 
 { package Object::Test; }
 
-use_ok('Moose');      
+{
+    package Foo;
+    ::use_ok('Moose');
+}
+
+done_testing;