mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-03-10 03:06:37 +00:00
fixed handling of autocreation for 10_OWServer.pm
git-svn-id: https://svn.fhem.de/fhem/trunk@6537 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
6ae941f04d
commit
f5250c8b12
@ -1,5 +1,6 @@
|
|||||||
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
|
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
|
||||||
# Do not insert empty lines here, update check depends on it.
|
# Do not insert empty lines here, update check depends on it.
|
||||||
|
- bugfix: fixed handling of autocreation for 10_OWServer.pm
|
||||||
- feature: option to cope with partial messages in ECMD/ECMDDevice
|
- feature: option to cope with partial messages in ECMD/ECMDDevice
|
||||||
- bugfix: SOMFY: add module to CUL client list, to set IODev automatically
|
- bugfix: SOMFY: add module to CUL client list, to set IODev automatically
|
||||||
- feature: sequence: triggerPartial Attribute added
|
- feature: sequence: triggerPartial Attribute added
|
||||||
|
@ -369,11 +369,14 @@ OWServer_Autocreate($)
|
|||||||
my ($hash)= @_;
|
my ($hash)= @_;
|
||||||
my $name = $hash->{NAME};
|
my $name = $hash->{NAME};
|
||||||
|
|
||||||
|
my $acdname= "";
|
||||||
foreach my $d (keys %defs) {
|
foreach my $d (keys %defs) {
|
||||||
next if($defs{$d}{TYPE} ne "autocreate");
|
next if($defs{$d}{TYPE} ne "autocreate");
|
||||||
return undef if(AttrVal($defs{$d}{NAME},"disable",undef));
|
$acdname= $defs{$d}{NAME};
|
||||||
|
return undef if(AttrVal($acdname,"disable",undef));
|
||||||
}
|
}
|
||||||
|
return undef unless($acdname ne "");
|
||||||
|
|
||||||
my $owserver= $hash->{fhem}{owserver};
|
my $owserver= $hash->{fhem}{owserver};
|
||||||
|
|
||||||
my @dir= split(",", $owserver->dir("/"));
|
my @dir= split(",", $owserver->dir("/"));
|
||||||
@ -423,7 +426,7 @@ OWServer_Autocreate($)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
CommandSave(undef,undef) if( $created && AttrVal( "autocreate", "autosave", 1 ) );
|
CommandSave(undef,undef) if( $created && AttrVal($acdname, "autosave", 1 ) );
|
||||||
|
|
||||||
return undef;
|
return undef;
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user