diff options
author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-08-14 20:23:54 +0000 |
---|---|---|
committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-08-14 20:23:54 +0000 |
commit | d98c38f818ed12acc107ad327ec3864ef4ade96a (patch) | |
tree | f0f0b380c03393f4f4258752bd03cb43adc768c6 /lib/Reaction/InterfaceModel | |
parent | bae75beec20b3b73faa2118db8ebfa5b93c9918a (diff) | |
download | reaction-d98c38f818ed12acc107ad327ec3864ef4ade96a.tar.gz reaction-d98c38f818ed12acc107ad327ec3864ef4ade96a.zip |
that warning is just idiotic
Diffstat (limited to 'lib/Reaction/InterfaceModel')
-rw-r--r-- | lib/Reaction/InterfaceModel/Action/DBIC/ResultSet/Create.pm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lib/Reaction/InterfaceModel/Action/DBIC/ResultSet/Create.pm b/lib/Reaction/InterfaceModel/Action/DBIC/ResultSet/Create.pm index eaaafec..d81ff5a 100644 --- a/lib/Reaction/InterfaceModel/Action/DBIC/ResultSet/Create.pm +++ b/lib/Reaction/InterfaceModel/Action/DBIC/ResultSet/Create.pm @@ -17,11 +17,7 @@ sub do_apply { my $new = $self->target_model->new({}); my @delay; foreach my $name (keys %$args) { - my $tm_attr = $new->meta->find_attribute_by_name($name); - unless ($tm_attr) { - warn "Unable to find attr for ${name}"; - next; - } + my $tm_attr = $new->meta->find_attribute_by_name($name) or next; my $tm_writer = $tm_attr->get_write_method; unless ($tm_writer) { warn "Unable to find writer for ${name}"; |