aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm b/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm
index 80f3fd2..4289282 100644
--- a/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm
+++ b/lib/Reaction/UI/ViewPort/Field/Mutable/ChooseOne.pm
@@ -1,6 +1,7 @@
package Reaction::UI::ViewPort::Field::Mutable::ChooseOne;
use Reaction::Class;
+use Scalar::Util ();
class ChooseOne is 'Reaction::UI::ViewPort::Field', which {
@@ -31,7 +32,7 @@ class ChooseOne is 'Reaction::UI::ViewPort::Field', which {
implements _build_value_string => as {
my $self = shift;
my $value = $self->value;
- return $self->obj_to_name($value->{value}) if ref $value eq 'HASH';
+ return $self->obj_to_name($value->{value}) if Scalar::Util::blessed($value);
$value;
};