From 814361b318817aa14c0c1cf4396112398942f42d Mon Sep 17 00:00:00 2001 From: Marko Oldenburg Date: Mon, 7 Aug 2017 17:40:11 +0200 Subject: [PATCH] fix blank character in name --- 73_GardenaSmartBridge.pm | 2 +- 74_GardenaSmartDevice.pm | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/73_GardenaSmartBridge.pm b/73_GardenaSmartBridge.pm index 5df2c2b..53658e4 100644 --- a/73_GardenaSmartBridge.pm +++ b/73_GardenaSmartBridge.pm @@ -64,7 +64,7 @@ eval "use JSON;1" or $missingModul .= "JSON "; ###todo Hier fehlt noch Modulabfrage für ssl -my $version = "0.0.28"; +my $version = "0.0.29"; diff --git a/74_GardenaSmartDevice.pm b/74_GardenaSmartDevice.pm index 6674ed7..20c5337 100644 --- a/74_GardenaSmartDevice.pm +++ b/74_GardenaSmartDevice.pm @@ -62,7 +62,7 @@ eval "use Encode qw(encode encode_utf8 decode_utf8);1" or $missingModul .= "Enco eval "use JSON;1" or $missingModul .= "JSON "; -my $version = "0.0.28"; +my $version = "0.0.29"; @@ -284,8 +284,8 @@ sub GardenaSmartDevice_Parse($$) { } else { - Log3 $name, 3, "GardenaSmartDevice ($name) - autocreate new device $decode_json->{name} with deviceId $decode_json->{id}, model $decode_json->{category} and IODev IODev=$name"; - return "UNDEFINED " . join(' ',$decode_json->{name}) . " GardenaSmartDevice $decode_json->{id} $decode_json->{category} IODev=$name"; + Log3 $name, 3, "GardenaSmartDevice ($name) - autocreate new device " . join('',split("[ \t]+",$decode_json->{name})) . " with deviceId $decode_json->{id}, model $decode_json->{category} and IODev IODev=$name"; + return "UNDEFINED " . join('',split("[ \t]+",$decode_json->{name})) . " GardenaSmartDevice $decode_json->{id} $decode_json->{category} IODev=$name"; } } }