From: Stevan Little Date: Wed, 12 Mar 2008 21:03:23 +0000 (+0000) Subject: old stuff in the test X-Git-Tag: 0_64~81 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=193c524256b3787067752d523b00a2e775a6c8fb;p=gitmo%2FClass-MOP.git old stuff in the test --- diff --git a/t/046_rebless_instance.t b/t/046_rebless_instance.t index 5ee4b7c..196039f 100644 --- a/t/046_rebless_instance.t +++ b/t/046_rebless_instance.t @@ -43,7 +43,7 @@ is($foo->whoami, "child", 'reblessed->whoami gives child'); is($foo->parent, "parent", 'reblessed->parent gives parent'); is($foo->child, "child", 'reblessed->child gives child'); -throws_ok { LeftField->meta->rebless_instance($foo, "LeftField") } +throws_ok { LeftField->meta->rebless_instance($foo) } qr/You may rebless only into a subclass of \(Child\), of which \(LeftField\) isn't\./; throws_ok { Class::MOP::Class->initialize("NonExistent")->rebless_instance($foo) }