From 1d77deac25f335243893e433e39022868bc6317d Mon Sep 17 00:00:00 2001 From: justme-1968 Date: Sun, 14 Dec 2014 19:55:42 +0000 Subject: [PATCH] 30_HUEBridge.pm: use from_json instead of decode_json to avoid encoding problems. forum: http://forum.fhem.de/index.php/topic,29939.0.html git-svn-id: https://svn.fhem.de/fhem/trunk@7215 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/30_HUEBridge.pm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/fhem/FHEM/30_HUEBridge.pm b/fhem/FHEM/30_HUEBridge.pm index f26bca43a..e2aac19db 100644 --- a/fhem/FHEM/30_HUEBridge.pm +++ b/fhem/FHEM/30_HUEBridge.pm @@ -13,7 +13,6 @@ use POSIX; use JSON; #use Try::Tiny; use Data::Dumper; -use MIME::Base64; sub HUEBridge_Initialize($) { @@ -61,7 +60,7 @@ HUEBridge_Define($$) if( defined($ret) && $ret ne '' ) { - my $obj = decode_json($ret); + my $obj = from_json($ret); if( defined($obj->[0]) && defined($obj->[0]->{'internalipaddress'}) ) { @@ -421,12 +420,12 @@ sub HUEBridge_HTTP_Call($$$) } # try { -# decode_json($ret); +# from_json($ret); # } catch { # return undef; # } - return HUEBridge_ProcessResponse($hash,decode_json($ret)); + return HUEBridge_ProcessResponse($hash,from_json($ret)); } #adapted version of the CustomGetFileFromURL subroutine from HttpUtils.pm