diff options
author | matthewt <matthewt@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-02-29 21:05:58 +0000 |
---|---|---|
committer | matthewt <matthewt@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-02-29 21:05:58 +0000 |
commit | f6ec638f6489a23441e584428d4bd7ccdffaef46 (patch) | |
tree | 24284e9a5ebf774109576cfff8e1f1eadb74fd7e /lib/Reaction/InterfaceModel | |
parent | 0ccdac9b6e6c486a66a213d48ab9e31eaec2cad4 (diff) | |
download | reaction-f6ec638f6489a23441e584428d4bd7ccdffaef46.tar.gz reaction-f6ec638f6489a23441e584428d4bd7ccdffaef46.zip |
undef fixes
Diffstat (limited to 'lib/Reaction/InterfaceModel')
-rw-r--r-- | lib/Reaction/InterfaceModel/Action/DBIC/Result/Update.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Reaction/InterfaceModel/Action/DBIC/Result/Update.pm b/lib/Reaction/InterfaceModel/Action/DBIC/Result/Update.pm index 2a822e6..59591ad 100644 --- a/lib/Reaction/InterfaceModel/Action/DBIC/Result/Update.pm +++ b/lib/Reaction/InterfaceModel/Action/DBIC/Result/Update.pm @@ -19,7 +19,7 @@ class Update is 'Reaction::InterfaceModel::Action', which { my $tm_attr = $tm->meta->find_attribute_by_name($name); next unless ref $tm_attr; my $tm_reader = $tm_attr->get_read_method; - $self->$writer($tm->$tm_reader); + $self->$writer($tm->$tm_reader) if defined($tm->$tm_reader); } }; |