Remove some private or useless methods/functions from Mouse::Meta::Module
[gitmo/Mouse.git] / t / 031-clone.t
index 711aaf5..be9cfa1 100644 (file)
@@ -1,8 +1,8 @@
 #!/usr/bin/env perl
 use strict;
 use warnings;
-use Test::More tests => 10;
-use t::Exception;
+use Test::More tests => 9;
+use Test::Exception;
 
 do {
     package Foo;
@@ -57,7 +57,4 @@ throws_ok {
     Foo->meta->clone_object(Foo->meta)
 } qr/You must pass an instance of the metaclass \(Foo\), not \(Mo.se::Meta::Class=HASH\(\w+\)\)/;
 
-throws_ok {
-    Foo->meta->clone_instance("constant")
-} qr/You can only clone instances, \(constant\) is not a blessed instance/;