aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Reaction/UI/ViewPort/DisplayField/Boolean.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Reaction/UI/ViewPort/DisplayField/Boolean.pm')
-rw-r--r--lib/Reaction/UI/ViewPort/DisplayField/Boolean.pm31
1 files changed, 31 insertions, 0 deletions
diff --git a/lib/Reaction/UI/ViewPort/DisplayField/Boolean.pm b/lib/Reaction/UI/ViewPort/DisplayField/Boolean.pm
new file mode 100644
index 0000000..9389436
--- /dev/null
+++ b/lib/Reaction/UI/ViewPort/DisplayField/Boolean.pm
@@ -0,0 +1,31 @@
+package Reaction::UI::ViewPort::DisplayField::Boolean;
+
+use Reaction::Class;
+use aliased 'Reaction::UI::ViewPort::DisplayField';
+
+class Boolean, is DisplayField, which {
+ has '+value' => (isa => 'Bool');
+ has '+layout' => (default => 'displayfield/value_string');
+
+ has value_string => (isa => 'Str', is => 'rw', lazy_build => 1);
+
+ has value_string_format =>
+ (isa => 'HashRef', is => 'rw', required => 1,
+ default => sub { {true => 'Yes', false => 'No'} }
+ );
+
+ implements build_value_string => as {
+ my $self = shift;
+ my $val = $self->value;
+ if(!defined $val || $val eq "" || "$val" eq '0'){
+ return $self->value_string_format->{false};
+ } elsif("$val" eq '1'){
+ return $self->value_string_format->{true};
+ } else{ #this will hopefully never happen
+ confess "Not supporting some type of Bool value";
+ }
+ };
+
+};
+
+1;