added coercion option to reflector

diff --git a/lib/Reaction/InterfaceModel/Reflector/DBIC.pm b/lib/Reaction/InterfaceModel/Reflector/DBIC.pm
index 20cb424..afa3dad 100644 (file)
--- a/lib/Reaction/InterfaceModel/Reflector/DBIC.pm
+++ b/lib/Reaction/InterfaceModel/Reflector/DBIC.pm
@@ -661,6 +661,7 @@ sub parameters_for_source_object_attribute {
                     domain_model   => $dm_name,
                     orig_attr_name => $attr_name,
                   );
+  $attr_opts{coerce} = 1 if $from_attr->should_coerce;
 
   #m2m / has_many
   my $m2m_meta;