mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

10_ZWave.pm: Fix useless usage message at init (Forum #40992)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@12084 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2016-08-28 09:21:29 +00:00
parent 3fb7130081
commit 4821d0cc4f
1 changed files with 11 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
fhem/FHEM/10_ZWave.pm
View File

@@ -298,7 +298,7 @@ my %zwave_class = (
'(hex($1)&0x80 ? ", dynamic":"").'.
'(hex($1)&0x40 ? ", identical":", different")',
"^..600a(.*)"=> 'ZWave_mcCapability($hash, $1)' },
init => { ORDER=>49, CMD => '"set $NAME mcCreateAll"' } },
init => { ORDER=>49, CMD => '"set $NAME -silent mcCreateAll"' } },
ZIP_PORTAL => { id => '61' },
DOOR_LOCK => { id => '62', # V2
set => { doorLockOperation => 'ZWave_DoorLockOperationSet($hash, "%s")',
@@ -353,7 +353,7 @@ my %zwave_class = (
=> 'ZWave_mfsParse($hash,$1,$2,$3,1)',
"0[8a]7205(....)(.{4})(.{4})(.*)"
=> 'ZWave_mfsParse($hash,$1,$2,$3,2)' },
init => { ORDER=>49, CMD => '"get $NAME model"' } },
init => { ORDER=>49, CMD => '"get $NAME -silent model"' } },
POWERLEVEL => { id => '73',
set => { powerlevel => "01%02x%02x",
powerlevelTest => "04%02x%02x%04x" },
@@ -411,7 +411,8 @@ my %zwave_class = (
"..840a(......)(......)(......)(......)" =>
'"wakeupIntervalCapabilitiesReport:min ".hex($1).'.
'" max ".hex($2)." default ".hex($3)." step ".hex($4)'},
init => { ORDER=>11, CMD => '"set $NAME wakeupInterval 86400 $CTRLID"' } },
init => { ORDER=>11,
CMD => '"set $NAME -silent wakeupInterval 86400 $CTRLID"' } },
ASSOCIATION => { id => '85',
set => { associationAdd => "01%02x%02x*",
associationDel => "04%02x%02x*" },
@@ -420,7 +421,8 @@ my %zwave_class = (
associationAll => 'ZWave_associationAllGet($hash,"")' },
parse => { "..8503(..)(..)..(.*)" => 'ZWave_assocGroup($homeId,$1,$2,$3)',
"..8506(..)" => '"assocGroups:".hex($1)' },
init => { ORDER=>10, CMD=> '"set $NAME associationAdd 1 $CTRLID"' } },
init => { ORDER=>10,
CMD => '"set $NAME -silent associationAdd 1 $CTRLID"'} },
VERSION => { id => '86',
get => { version => "11",
versionClass => 'ZWave_versionClassGet($hash, "%s")',
@@ -435,7 +437,7 @@ my %zwave_class = (
'%d.%02d App %d.%d HW %d FWCounter %d FW %d.%d",'.
'unpack("C*",pack("H*","$1")))',
"048614(..)(..)" => '"versionClass_".hex($1).":".hex($2)' },
init => { ORDER=>12, CMD => '"get $NAME versionClassAll"' } },
init => { ORDER=>1, CMD => '"get $NAME versionClassAll"' } },
INDICATOR => { id => '87',
set => { indicatorOff => "0100",
indicatorOn => "01FF",
@@ -558,7 +560,7 @@ our %zwave_deviceSpecial;
ZME_KFOB => {
ZWAVEPLUS_INFO => {
# Example only. ORDER must be >= 50
init => { ORDER=>50, CMD => '"get $NAME zwavePlusInfo"' } } }
init => { ORDER=>50, CMD => '"get $NAME -silent zwavePlusInfo"' } } }
);
my $zwave_cryptRijndael = 0;
@@ -770,6 +772,7 @@ ZWave_Cmd($$@)
my ($type, $hash, @a) = @_;
return "no $type argument specified" if(int(@a) < 2);
my $name = shift(@a);
my $silent = shift(@a) if($a[0] eq "-silent");
my $cmd = shift(@a);
# Collect the commands from the distinct classes
@@ -812,6 +815,8 @@ ZWave_Cmd($$@)
}
if(!$cmdList{$cmd}) {
return "" if($silent);
my @list;
my $mc = ReadingsVal($hash->{NAME}, "modelConfig", "");
foreach my $lcmd (sort keys %cmdList) {