FHEM/mod-GardenaSmart
1
0
Fork 0
Code Issues 2 Pull Requests Releases 3 Wiki Activity

add makeDeviceName fhem.pl function to create new devices

Browse Source
This commit is contained in:
Marko Oldenburg 2017-09-05 21:11:05 +02:00
parent c0d898e983
commit 90f694f71f
2 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
73_GardenaSmartBridge.pm
View File

@ -70,7 +70,7 @@ eval "use IO::Socket::SSL;1" or $missingModul .= "IO::Socket::SSL ";
###todo Hier fehlt noch Modulabfrage für ssl ###todo Hier fehlt noch Modulabfrage für ssl
my $version = "0.2.0"; my $version = "0.2.1";
@ -809,7 +809,7 @@ sub GardenaSmartBridge_ParseJSON($$) {
<ul> <ul>
<li>debugJSON - </li> <li>debugJSON - </li>
<li>disable - Disables the Bridge</li> <li>disable - Disables the Bridge</li>
<li>interval - Interval in Minutes (Default=5)</li> <li>interval - Interval in seconds (Default=300)</li>
</ul> </ul>
</ul> </ul>

9
74_GardenaSmartDevice.pm
View File

@ -64,11 +64,11 @@ use Time::Local;
use Data::Dumper; #debugging use Data::Dumper; #debugging
eval "use Encode qw(encode encode_utf8 decode_utf8);1" or $missingModul .= "Encode "; # eval "use Encode qw(encode encode_utf8 decode_utf8);1" or $missingModul .= "Encode "; wird nicht benötigt
eval "use JSON;1" or $missingModul .= "JSON "; eval "use JSON;1" or $missingModul .= "JSON ";
my $version = "0.2.1"; my $version = "0.2.2";
@ -313,8 +313,9 @@ sub GardenaSmartDevice_Parse($$) {
} else { } else {
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"; Log3 $name, 3, "GardenaSmartDevice ($name) - autocreate new device " . makeDeviceName($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"; #return "UNDEFINED " . join('',split("[ \t]+",$decode_json->{name})) . " GardenaSmartDevice $decode_json->{id} $decode_json->{category} IODev=$name";
return "UNDEFINED " . makeDeviceName($decode_json->{name}) . " GardenaSmartDevice $decode_json->{id} $decode_json->{category} IODev=$name";
} }
} }
} }