Need to specify package names
Shawn M Moore [Mon, 22 Dec 2008 04:00:38 +0000 (04:00 +0000)]
t/800_shikabased/008-create_class.t

index 99143f3..6d6bad5 100644 (file)
@@ -7,6 +7,7 @@ use Test::Exception;
 # error handling
 throws_ok {
     Mouse::Meta::Class->create(
+        "ClassName",
         superclasses => "foo"
     );
 } qr/You must pass an ARRAY ref of superclasses/;
@@ -14,12 +15,14 @@ throws_ok {
 
 throws_ok {
     Mouse::Meta::Class->create(
+        "ClassName",
         attributes => "foo"
     );
 } qr/You must pass an ARRAY ref of attributes/;
 
 throws_ok {
     Mouse::Meta::Class->create(
+        "ClassName",
         methods => "foo"
     );
 } qr/You must pass a HASH ref of methods/;