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";