fixed Boolean->adopt_value_string

[catagits/Reaction.git] / lib / Reaction / UI / ViewPort / Field / Mutable / Boolean.pm

diff --git a/lib/Reaction/UI/ViewPort/Field/Mutable/Boolean.pm b/lib/Reaction/UI/ViewPort/Field/Mutable/Boolean.pm
index 9063fca..e725615 100644 (file)
--- a/lib/Reaction/UI/ViewPort/Field/Mutable/Boolean.pm
+++ b/lib/Reaction/UI/ViewPort/Field/Mutable/Boolean.pm
@@ -8,7 +8,7 @@ extends 'Reaction::UI::ViewPort::Field::Boolean';
 with 'Reaction::UI::ViewPort::Field::Role::Mutable::Simple';
 sub adopt_value_string {
   my ($self) = @_;
-  $self->value($self->value_string);
+  $self->value($self->value_string||0);
 };
 sub BUILD {
   my($self) = @_;