From 0c5fd04419d462bb2fba993e8822ac8e74d75a44 Mon Sep 17 00:00:00 2001
From: betateilchen <>
Date: Thu, 24 Apr 2014 09:11:55 +0000
Subject: [PATCH] fixed: use correct tzoffset to analyze CAP messages

git-svn-id: https://svn.fhem.de/fhem/trunk@5624 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/55_GDS.pm | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/55_GDS.pm b/fhem/FHEM/55_GDS.pm
index 04afff775..5330cbc6a 100644
--- a/fhem/FHEM/55_GDS.pm
+++ b/fhem/FHEM/55_GDS.pm
@@ -584,10 +584,24 @@ sub decodeCAPData($$){
 	return;
 }
 
+# sub
+# _calctz($@)
+# {
+  # my ($nt,@lt) = @_;
+
+  # my $off = $lt[2]*3600+$lt[1]*60+$lt[0];
+  # $off = 12*3600-$off;
+  # $nt += $off;  # This is noon, localtime
+
+  # my @gt = gmtime($nt);
+
+  # return (12-$gt[2]);
+# }
+
 sub checkCAPValid($){
 	my ($expires) = @_;
 	my $valid = 0;
-	my $offset = ReadingsVal('gdsOffset','state',0);
+	my $offset = _calctz(time,localtime(time))*3600; # used from 99_SUNRISE_EL
 	$expires =~ s/T/ /;
 	$expires =~ s/\+/ \+/;
 	$expires = time_str2num($expires);