00_ZWDongle.pm: accept UNKNOWN_X (Forum #50873)

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@11070 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2016-03-15 13:58:59 +00:00
parent 27388e7880
commit 6ddf1431de

View File

@ -158,11 +158,14 @@ ZWDongle_Set($@)
return; return;
} }
if(($type eq "removeFailedNode" || if($type eq "removeFailedNode" ||
$type eq "replaceFailedNode" || $type eq "replaceFailedNode" ||
$type eq "sendNIF") && $type eq "sendNIF") {
$defs{$a[0]} && $defs{$a[0]}{nodeIdHex}) {
$a[0] = hex($defs{$a[0]}{nodeIdHex}); $a[0] =~ s/^UNKNOWN_//;
$a[0] = hex($defs{$a[0]}{nodeIdHex})
if($defs{$a[0]} && $defs{$a[0]}{nodeIdHex});
} }
my $cmd = $sets{$type}{cmd}; my $cmd = $sets{$type}{cmd};
@ -241,11 +244,14 @@ ZWDongle_Get($@)
return "No $cmd for dummies" if(IsDummy($name)); return "No $cmd for dummies" if(IsDummy($name));
if(($cmd eq "neighborList" || if($cmd eq "neighborList" ||
$cmd eq "nodeInfo" || $cmd eq "nodeInfo" ||
$cmd eq "isFailedNode") && $cmd eq "isFailedNode") {
$defs{$a[0]} && $defs{$a[0]}{nodeIdHex}) {
$a[0] = hex($defs{$a[0]}{nodeIdHex}); $a[0] =~ s/^UNKNOWN_//;
$a[0] = hex($defs{$a[0]}{nodeIdHex})
if($defs{$a[0]} && $defs{$a[0]}{nodeIdHex});
} }
my $out = sprintf($gets{$cmd}, @a); my $out = sprintf($gets{$cmd}, @a);