SL::DB::CustomVariable: value() für Typ 'date' gefixt

Bisher wurde schlicht das falsche Feld zurückgegeben: text_value. Nun
wird eine Instanz von DateTime zurückgegeben, die auf den Tag
getruncatet ist.

diff --git a/SL/DB/CustomVariable.pm b/SL/DB/CustomVariable.pm
index 560a2de..fb990b0 100644 (file)
--- a/SL/DB/CustomVariable.pm
+++ b/SL/DB/CustomVariable.pm
@@ -75,9 +75,11 @@ sub value {
 
     my $id = int($self->number_value);
     return $id ? SL::DB::Part->new(id => $id)->load() : undef;
+  } elsif ( $type eq 'date' ) {
+    return $self->timestamp_value->clone->truncate(to => 'day');
   }
 
-  goto &text_value; # text, textfield, date and select
+  goto &text_value; # text, textfield and select
 }
 
 sub value_as_text {