setting value for Field::Mutable::DateTime in order to get an error message

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

diff --git a/lib/Reaction/UI/ViewPort/Field/TimeRange.pm b/lib/Reaction/UI/ViewPort/Field/TimeRange.pm
index fb11841..ccf6e65 100644 (file)
--- a/lib/Reaction/UI/ViewPort/Field/TimeRange.pm
+++ b/lib/Reaction/UI/ViewPort/Field/TimeRange.pm
@@ -1,14 +1,14 @@
 package Reaction::UI::ViewPort::Field::TimeRange;
 
 use Reaction::Class;
-use Reaction::Types::DateTime;
+use Reaction::Types::DateTime qw(SpanSet);
 use DateTime;
 use DateTime::SpanSet;
 use Time::ParseDate ();
 
 class TimeRange is 'Reaction::UI::ViewPort::Field', which {
 
-  has '+value' => (isa => 'DateTime::SpanSet');
+  has '+value' => (isa => SpanSet);
 
   #has '+layout' => (default => 'timerange');
 
@@ -26,7 +26,7 @@ class TimeRange is 'Reaction::UI::ViewPort::Field', which {
     is_weak_ref => 1
   );
 
-  implements build_value_string => as {
+  implements _build_value_string => as {
     my $self = shift;
     #return '' unless $self->has_value;
     #return $self->value_string;