From: Stevan Little <stevan.little@iinteractive.com>
Date: Fri, 28 Apr 2006 20:35:35 +0000 (+0000)
Subject: done
X-Git-Tag: 0_29_02~35
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fc3ddd1d180b39fdcde1f7169e14cfbc7fdf55de;p=gitmo%2FClass-MOP.git

done
---

diff --git a/lib/Class/MOP/Instance.pm b/lib/Class/MOP/Instance.pm
index 10a112d..b8e2450 100644
--- a/lib/Class/MOP/Instance.pm
+++ b/lib/Class/MOP/Instance.pm
@@ -18,6 +18,16 @@ sub new {
     my ($class, $meta, @attrs) = @_;
     my @slots = map { $_->name } @attrs;
     bless {
+        # NOTE:
+        # I am not sure that it makes
+        # sense to pass in the meta
+        # The ideal would be to just 
+        # pass in the class name, but 
+        # that is placing too much of 
+        # an assumption on bless(), 
+        # which is *probably* a safe
+        # assumption,.. but you can 
+        # never tell <:)
         meta  => $meta,
         slots => \@slots,
     } => $class;