From e60e2f124423b874879bdda54af3b15d69cbeae8 Mon Sep 17 00:00:00 2001 From: mgehre <> Date: Wed, 26 Nov 2014 19:49:23 +0000 Subject: [PATCH] MAX: more robustness checks git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@7067 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/14_CUL_MAX.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FHEM/14_CUL_MAX.pm b/FHEM/14_CUL_MAX.pm index f3af32576..26260ecdb 100644 --- a/FHEM/14_CUL_MAX.pm +++ b/FHEM/14_CUL_MAX.pm @@ -290,7 +290,7 @@ CUL_MAX_Parse($$) } #Handle outgoing messages to that ShutterContact. It is only awake shortly #after sending an Ack to a PairPong - CUL_MAX_SendQueueHandler($shash, $src) if($modules{MAX}{defptr}{$src}{type} eq "ShutterContact"); + CUL_MAX_SendQueueHandler($shash, $src) if(exists($modules{MAX}{defptr}{$src}) && $modules{MAX}{defptr}{$src}{type} eq "ShutterContact"); return $shash->{NAME}; } elsif($msgType eq "TimeInformation") { @@ -479,7 +479,7 @@ CUL_MAX_SendQueueHandler($$) #Send to CUL my ($credit10ms) = (CommandGet("","$hash->{IODev}{NAME} credit10ms") =~ /[^ ]* [^ ]* => (.*)/); - if($credit10ms eq "No answer") { + if(!defined($credit10ms) || $credit10ms eq "No answer") { Log3 $hash, 1, "Error in CUL_MAX_SendQueueHandler: CUL $hash->{IODev}{NAME} did not answer request for current credits. Waiting 5 seconds."; $timeout += 5; } else {