X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FReaction%2FUI%2FViewPort%2FField%2FBoolean.pm;h=626045cfa51d30b948ccc5d59473ccc64db96a99;hb=565a1fc7fe67c721f2766bdc3f55c5fcb33fc760;hp=cb6695e1127dd0134b100218869284ebeb4beba8;hpb=ba9938e7802f82b445dbdf1c16ce5700feee08b8;p=catagits%2FReaction.git diff --git a/lib/Reaction/UI/ViewPort/Field/Boolean.pm b/lib/Reaction/UI/ViewPort/Field/Boolean.pm index cb6695e..626045c 100644 --- a/lib/Reaction/UI/ViewPort/Field/Boolean.pm +++ b/lib/Reaction/UI/ViewPort/Field/Boolean.pm @@ -1,12 +1,15 @@ package Reaction::UI::ViewPort::Field::Boolean; use Reaction::Class; -use aliased 'Reaction::UI::ViewPort::Field'; +extends 'Reaction::UI::ViewPort::Field'; -class Boolean, is Field, which { - has '+value' => (isa => 'Bool'); +use namespace::clean -except => [ qw(meta) ]; +use MooseX::Types::Moose qw/Bool/; - override _empty_string_value => sub { 0 }; -}; +has '+value' => (isa => Bool); + +override _empty_string_value => sub { 0 }; + +__PACKAGE__->meta->make_immutable; 1;