From 37170da51245c4b87cbb3f6290a4bffe1789b4d4 Mon Sep 17 00:00:00 2001
From: Wzut <>
Date: Wed, 13 Jan 2021 15:38:49 +0000
Subject: [PATCH] 10_MAX.pm:fix Perl warning at line 1738

git-svn-id: https://svn.fhem.de/fhem/trunk@23517 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_MAX.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/fhem/FHEM/10_MAX.pm b/fhem/FHEM/10_MAX.pm
index 5348c5d8c..bac956123 100755
--- a/fhem/FHEM/10_MAX.pm
+++ b/fhem/FHEM/10_MAX.pm
@@ -1730,6 +1730,7 @@ sub MAX_Parse
   elsif($msgtype eq "PushButtonState") 
   {
     my ($bits2, $isopen) = unpack("aC",pack("H*",$args[0]));
+    $isopen //= '?';
     #The meaning of $bits2 is completly guessed based on similarity to other devices, TODO: confirm
     $shash->{'.gateway'} = vec($bits2, 4, 1); # Paired to a CUBE?
     $shash->{'.rferror'} = vec($bits2, 6, 1); # communication with link partner (1 if we did not sent an Ack)