type constraints now stringify to their name (phaylon)
[gitmo/Moose.git] / t / 005_recipe.t
index 5736130..7ea0371 100644 (file)
@@ -8,7 +8,7 @@ use Test::More;
 BEGIN {
     eval "use HTTP::Headers; use Params::Coerce; use URI;";
     plan skip_all => "HTTP::Headers & Params::Coerce & URI required for this test" if $@;        
-    plan no_plan => 1;    
+    plan tests => 18;    
 }
 
 use Test::Exception;
@@ -61,6 +61,8 @@ BEGIN {
            coerce  => 1,
            default => sub { HTTP::Headers->new } 
     );
+    
+    __PACKAGE__->meta->make_immutable(debug => 0);
 }
 
 my $r = Request->new;