X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FObject.pm;h=c11ca0efa67f84677645dd5e26c91f79a19e6a54;hb=19042e4de51060275cd940cf997a6791afb0dfec;hp=f3a22e0f599d78e9f4e3ca54457eab09c1090e67;hpb=650e83227574b3c6ca6cfbcbaca643b913741bee;p=gitmo%2FClass-MOP.git

diff --git a/lib/Class/MOP/Object.pm b/lib/Class/MOP/Object.pm
index f3a22e0..c11ca0e 100644
--- a/lib/Class/MOP/Object.pm
+++ b/lib/Class/MOP/Object.pm
@@ -6,7 +6,7 @@ use warnings;
 
 use Scalar::Util 'blessed';
 
-our $VERSION   = '0.64_02';
+our $VERSION   = '0.92';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
@@ -18,7 +18,7 @@ sub meta {
 }
 
 sub _new {
-    shift->meta->new_object(@_);
+    Class::MOP::class_of(shift)->new_object(@_);
 }
 
 # RANT:
@@ -45,50 +45,27 @@ __END__
 
 =head1 NAME 
 
-Class::MOP::Object - Object Meta Object
+Class::MOP::Object - Base class for metaclasses
 
 =head1 DESCRIPTION
 
-This class is basically a stub, it provides no functionality at all, 
-and really just exists to make the Class::MOP metamodel complete.
-
-                         ......
-                        :      :                  
-                        :      v
-                  +-------------------+
-            +-----| Class::MOP::Class |
-            |     +-------------------+
-            |        ^      ^       ^
-            v        :      :       :
-  +--------------------+    :      +--------------------+
-  | Class::MOP::Module |    :      | Class::MOP::Object |
-  +--------------------+    :      +--------------------+
-            |               :                ^
-            |               :                |
-            |    +---------------------+     |
-            +--->| Class::MOP::Package |-----+
-                 +---------------------+
-                 
-  legend:
-    ..(is an instance of)..>
-    --(is a subclass of)--->
-
-A deeper discussion of this model is currently beyond the scope of 
-this documenation. 
-  
+This class is a very minimal base class for metaclasses.
+
 =head1 METHODS
 
+This class provides a few methods which are useful in all metaclasses.
+
 =over 4
 
-=item B<meta>
+=item B<< Class::MOP::???->meta >>
+
+This returns a L<Class::MOP::Class> object.
 
-=item B<dump (?$max_depth)>
+=item B<< $metaobject->dump($max_depth) >>
 
-This will C<require> the L<Data::Dumper> module and then dump a 
-representation of your object. It passed the C<$max_depth> arg 
-to C<$Data::Dumper::Maxdepth>. The default C<$max_depth> is 1, 
-so it will not go crazy and print a massive bunch of stuff. 
-Adjust this as nessecary.
+This method uses L<Data::Dumper> to dump the object. You can pass an
+optional maximum depth, which will set C<$Data::Dumper::Maxdepth>. The
+default maximum depth is 1.
 
 =back
 
@@ -98,7 +75,7 @@ Stevan Little E<lt>stevan@iinteractive.comE<gt>
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright 2006-2008 by Infinity Interactive, Inc.
+Copyright 2006-2009 by Infinity Interactive, Inc.
 
 L<http://www.iinteractive.com>