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

package Reaction::UI::ViewPort::Field::Boolean;

use Reaction::Class;
use aliased 'Reaction::UI::ViewPort::Field';

class Boolean, is Field, which {
  has '+value' => (isa => 'Bool');

  implements _empty_value => as { undef };
};

1;
Commit	Line	Data
7adfd53f	1	package Reaction::UI::ViewPort::Field::Boolean;
	2
	3	use Reaction::Class;
ddccc6a2	4	use aliased 'Reaction::UI::ViewPort::Field';
7adfd53f	5
ddccc6a2	6	class Boolean, is Field, which {
7adfd53f	7	has '+value' => (isa => 'Bool');
1734a92a	8
1734a92a	9	implements _empty_value => as { undef };
7adfd53f	10	};
7adfd53f	11
6ab43711	12	1;