fix for timezone not supported by perl in timestamp function

Marcin Przepiorowski · Marcin Przepiorowski · commit 9fe4d71d3183 · 2022-12-20T14:30:15.000Z
diff --git a/lib/Toolkit_helpers.pm b/lib/Toolkit_helpers.pm
@@ -485,7 +485,7 @@ sub timestamp {
 	}
 
 	my $tz = new Date::Manip::TZ;
-	my $detz = $engine->getTimezone();
+	my $detz = timezone_fix($engine->getTimezone());
 	my $dt = ParseDate($timestamp);
 	if ($dt ne '') {
 		my ($err,$date,$offset,$isdst,$abbrev) = $tz->convert_to_gmt($dt, $detz);

Original file line number	Diff line number	Diff line change
`@@ -485,7 +485,7 @@ sub timestamp {`
`485`	`485`	`}`
`486`	`486`
`487`	`487`	`my $tz = new Date::Manip::TZ;`
`488`		`- my $detz = $engine->getTimezone();`
	`488`	`+ my $detz = timezone_fix($engine->getTimezone());`
`489`	`489`	`my $dt = ParseDate($timestamp);`
`490`	`490`	`if ($dt ne '') {`
`491`	`491`	`my ($err,$date,$offset,$isdst,$abbrev) = $tz->convert_to_gmt($dt, $detz);`