set the attr in rebless_instance when it has no init_arg

diff --git a/lib/Class/MOP/Class.pm b/lib/Class/MOP/Class.pm
index e299e53..d2c9eef 100644 (file)
--- a/lib/Class/MOP/Class.pm
+++ b/lib/Class/MOP/Class.pm
@@ -431,7 +431,7 @@ sub rebless_instance {
                     unless exists $params{$init_arg};
             } 
             else {
-                $attr->set_value($instance);
+                $attr->set_value($instance, $attr->get_value($instance));
             }
         }
     }