aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Reaction/UI/ViewPort/Field
diff options
context:
space:
mode:
authormatthewt <matthewt@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2008-02-27 20:50:52 +0000
committermatthewt <matthewt@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2008-02-27 20:50:52 +0000
commit6a21690e1a46845437b034eb10da0528bcdc1140 (patch)
tree7853fd5263eb209fb07555f4017e73b29fc46d51 /lib/Reaction/UI/ViewPort/Field
parent384a99858802ee0569ba621c2162c15501c8e94e (diff)
downloadreaction-6a21690e1a46845437b034eb10da0528bcdc1140.tar.gz
reaction-6a21690e1a46845437b034eb10da0528bcdc1140.zip
fix value checking for non-object choices
Diffstat (limited to 'lib/Reaction/UI/ViewPort/Field')
-rw-r--r--lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm b/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm
index 9033528..f6b679a 100644
--- a/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm
+++ b/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm
@@ -37,7 +37,7 @@ class ChooseOne is 'Reaction::UI::ViewPort::Field', which {
my ($self, $check_value) = @_;
return unless $self->_model_has_value;
my $our_value = $self->value;
- return unless ref($our_value);
+ return unless defined($our_value);
$check_value = $self->obj_to_str($check_value) if ref($check_value);
return $self->obj_to_str($our_value) eq $check_value;
};