From: Stevan Little <stevan.little@iinteractive.com>
Date: Thu, 4 May 2006 03:50:58 +0000 (+0000)
Subject: moo
X-Git-Tag: 0_29_02~13
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=66b3dded133054c3e21b5494f5956fe338bef071;p=gitmo%2FClass-MOP.git

moo
---

diff --git a/lib/Class/MOP/Class.pm b/lib/Class/MOP/Class.pm
index 8fa015d..04d23ea 100644
--- a/lib/Class/MOP/Class.pm
+++ b/lib/Class/MOP/Class.pm
@@ -774,11 +774,17 @@ This will create an anonymous class, it works much like C<create> but
 it does not need a C<$package_name>. Instead it will create a suitably 
 unique package name for you to stash things into.
 
-=item B<initialize ($package_name)>
+=item B<initialize ($package_name, %options)>
 
 This initializes and returns returns a B<Class::MOP::Class> object 
 for a given a C<$package_name>.
 
+=item B<reinitialize ($package_name, %options)>
+
+This removes the old metaclass, and creates a new one in it's place.
+Do B<not> use this unless you really know what you are doing, it could 
+very easily make a very large mess of your program. 
+
 =item B<construct_class_instance (%options)>
 
 This will construct an instance of B<Class::MOP::Class>, it is 
diff --git a/t/010_self_introspection.t b/t/010_self_introspection.t
index 75e8429..be5433b 100644
--- a/t/010_self_introspection.t
+++ b/t/010_self_introspection.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 142;
+use Test::More tests => 144;
 use Test::Exception;
 
 BEGIN {
@@ -24,7 +24,7 @@ my @methods = qw(
     
     get_all_metaclasses get_all_metaclass_names get_all_metaclass_instances 
     
-    initialize create create_anon_class
+    initialize reinitialize create create_anon_class
     
     instance_metaclass get_meta_instance
     new_object clone_object