From 0e0fb447c8e9c8d5aafa24cc759d0f5d0879190f Mon Sep 17 00:00:00 2001
From: LeonGaultier <LeonGaultier@users.noreply.github.com>
Date: Tue, 20 Aug 2019 07:20:44 +0000
Subject: [PATCH] 73_NUKIBridge: Can't use stringas a HASH ref while strict
 refs in use

git-svn-id: https://svn.fhem.de/fhem/trunk@20027 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/CHANGED               | 2 ++
 fhem/FHEM/73_NUKIBridge.pm | 4 +++-
 fhem/FHEM/74_NUKIDevice.pm | 2 +-
 3 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/fhem/CHANGED b/fhem/CHANGED
index 841a055ca..1fc3c72c1 100644
--- a/fhem/CHANGED
+++ b/fhem/CHANGED
@@ -1,5 +1,7 @@
 # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
 # Do not insert empty lines here, update check depends on it.
+ - bugfix:  73_NUKIBridge: fix "Can't use stringas a HASH ref while strict
+                           refs in use"
  - change:  88_HMCCU: New features and bug fixes
  - feature: 36_WMBUS: initial support for mode 7 encryption (mostly untested)
             Digest::CMAC must be installed
diff --git a/fhem/FHEM/73_NUKIBridge.pm b/fhem/FHEM/73_NUKIBridge.pm
index 8810c401f..0a405f278 100644
--- a/fhem/FHEM/73_NUKIBridge.pm
+++ b/fhem/FHEM/73_NUKIBridge.pm
@@ -46,7 +46,7 @@ use JSON;
 
 use HttpUtils;
 
-my $version     = "0.6.3";
+my $version     = "0.6.4";
 my $bridgeapi   = "1.6";
 
 
@@ -681,6 +681,8 @@ sub NUKIBridge_getCallbackList($) {
 
     
     my $decode_json = NUKIBridge_CallBlocking($hash,"callback/list",undef);
+    return
+      unless ( ref($decode_json) eq 'HASH' );
     
     Log3 $name, 4, "NUKIBridge ($name) - Callback data is collected and processed";
     
diff --git a/fhem/FHEM/74_NUKIDevice.pm b/fhem/FHEM/74_NUKIDevice.pm
index 5a059e768..d3e0ab2af 100644
--- a/fhem/FHEM/74_NUKIDevice.pm
+++ b/fhem/FHEM/74_NUKIDevice.pm
@@ -33,7 +33,7 @@ use warnings;
 use JSON;
 
 
-my $version = "0.6.3";
+my $version = "0.6.4";