give the initializer a test

[gitmo/Class-MOP.git] / lib / Class / MOP / Instance.pm

diff --git a/lib/Class/MOP/Instance.pm b/lib/Class/MOP/Instance.pm
index 9aa3f33..d1ed877 100644 (file)
--- a/lib/Class/MOP/Instance.pm
+++ b/lib/Class/MOP/Instance.pm
@@ -89,7 +89,7 @@ sub _set_initial_slot_value {
   };
 
   # most things will just want to set a value, so make it first arg
-  $instance->$initializer($value, $callback);
+  $instance->$initializer($value, $slot_name, $callback);
 }
 
 sub initialize_slot {