FHEM/mod-AMAD
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove IODev in Define and add IODev Attribut

Browse Source
This commit is contained in:
Marko Oldenburg 2017-12-19 13:13:49 +01:00
parent f1b36d3322
commit da980affef
1 changed files with 13 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
74_AMADDevice.pm
View File

@ -121,6 +121,7 @@ sub AMADDevice_Initialize($) {
"root:0,1 ".
"disable:1 ".
"remoteServer:Automagic,Autoremote,TNES,other ".
"IODev ".
$readingFnAttributes;
foreach my $d(sort keys %{$modules{AMADDevice}{defptr}}) {
@ -143,7 +144,9 @@ sub AMADDevice_Define($$) {
my $name = $a[0];
my $host = $a[2];
my $amad_id = $a[3];
my $$remoteServer = $a[4];
my $remoteServer = $a[4];
$hash->{DEF} = "$host $amad_id Automagic" if( $remoteServer ne 'Automagic' );
$hash->{HOST} = $host;
$hash->{AMAD_ID} = $amad_id;
@ -157,14 +160,15 @@ sub AMADDevice_Define($$) {
CommandAttr(undef,"$name IODev $modules{AMADCommBridge}{defptr}{BRIDGE}->{NAME}") if(AttrVal($name,'IODev','none') eq 'none');
my $iodev = AttrVal($name,'IODev','none');
AssignIoPort($hash,$iodev) if( !$hash->{IODev} );
if(defined($hash->{IODev}->{NAME})) {
Log3 $name, 3, "AMADDevice ($name) - I/O device is " . $hash->{IODev}->{NAME};
} else {
Log3 $name, 1, "AMADDevice ($name) - no I/O device";
}
@ -738,7 +742,7 @@ sub AMADDevice_Parse($$) {
} else {
return "UNDEFINED $fhemDevice AMADDevice $decode_json->{firstrun}{'amaddevice_ip'} $decode_json->{amad}{'amad_id'} IODev=$name";
return "UNDEFINED $fhemDevice AMADDevice $decode_json->{firstrun}{'amaddevice_ip'} $decode_json->{amad}{'amad_id'}";
}
}