From: Stevan Little <stevan.little@iinteractive.com>
Date: Mon, 6 Feb 2006 02:27:28 +0000 (+0000)
Subject: changes and the new test
X-Git-Tag: 0_06~4
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=526ba574c9dfda8f386f44c36a7f05d815155deb;p=gitmo%2FClass-MOP.git

changes and the new test
---

diff --git a/t/006_new_and_clone_metaclasses.t b/t/006_new_and_clone_metaclasses.t
index d36da5f..3646cf4 100644
--- a/t/006_new_and_clone_metaclasses.t
+++ b/t/006_new_and_clone_metaclasses.t
@@ -81,6 +81,8 @@ isa_ok($baz_meta, 'MyMetaClass');
 is($my_meta->new_object(':package' => 'Baz'), $baz_meta, '... got the right Baz->meta singleton');
 is($my_meta->clone_object($baz_meta), $baz_meta, '... cloning got the right Baz->meta singleton');
 
+$baz_meta->superclasses('Bar');
+
 # now create a regular objects for real
 
 my $foo = $foo_meta->new_object();