Issue #388: There is no $Self->{TimeZone} in Kernel::System::DateTime

Author: bschmalhofer

Kernel/System/DateTime.pm

@@ -784,15 +784,15 @@ sub WorkingTime {
         'Kernel::System::DateTime',
         ObjectParams => {
             Epoch    => $Param{StartTime},
-            TimeZone => $Self->{TimeZone},
+            TimeZone => $Self->{CPANDateTimeObject}->time_zone()->name(),
         },
     );
 
     my $StopDateTimeObject = $Kernel::OM->Create(
         'Kernel::System::DateTime',
         ObjectParams => {
             Epoch    => $Param{StopTime},
-            TimeZone => $Self->{TimeZone},
+            TimeZone => $Self->{CPANDateTimeObject}->time_zone()->name(),
         },
     );
 
@@ -1153,7 +1153,7 @@ Returns:
 sub ToTimeZone {
     my ( $Self, %Param ) = @_;
 
-    for my $RequiredParam (qw( TimeZone )) {
+    for my $RequiredParam ( qw(TimeZone) ) {
         if ( !defined $Param{$RequiredParam} ) {
             $Kernel::OM->Get('Kernel::System::Log')->Log(
                 'Priority' => 'Error',
@@ -1603,7 +1603,7 @@ Returns:
 sub IsTimeZoneValid {
     my ( $Self, %Param ) = @_;
 
-    for my $RequiredParam (qw( TimeZone )) {
+    for my $RequiredParam ( qw(TimeZone) ) {
         if ( !defined $Param{$RequiredParam} ) {
             $Kernel::OM->Get('Kernel::System::Log')->Log(
                 'Priority' => 'Error',