CUL_MAX: fix TimeInformation being in UTC (thanks to Ulf)

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@2595 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
mgehre
2013-01-29 20:23:29 +00:00
parent 8d60d951f1
commit 3e1e0ea098

View File

@@ -341,7 +341,7 @@ CUL_MAX_Resend($)
sub
CUL_MAX_GetTimeInformationPayload()
{
my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = gmtime(time());
my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime(time());
$mon += 1; #make month 1-based
#month encoding is just guessed
#perls localtime gives years since 1900, and we need years since 2000