2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 18:59:33 +00:00

added :noArg to set commands

git-svn-id: https://svn.fhem.de/fhem/trunk@3653 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2013-08-09 19:00:19 +00:00
parent f185dcdfef
commit fcf8e1e5f1
5 changed files with 14 additions and 9 deletions

View File

@ -165,8 +165,8 @@ HUEBridge_Set($@)
$hash->{STATE} = "updating";
return "starting update";
} else {
my $list = "statusRequest";
$list .= " swupdate" if( defined($hash->{updatestate}) && $hash->{updatestate} == 2 );
my $list = "statusRequest:noArg";
$list .= " swupdate:noArg" if( defined($hash->{updatestate}) && $hash->{updatestate} == 2 );
return "Unknown argument $cmd, choose one of $list";
}
}

View File

@ -318,7 +318,7 @@ HUEDevice_Set($@)
return undef;
}
my $list = "off on toggle statusRequest";
my $list = "off:noArg on:noArg toggle:noArg statusRequest:noArg";
$list .= " pct:slider,0,1,100 bri:slider,0,1,254" if( AttrVal($name, "subType", "colordimmer") =~ m/dimmer/ );
#$list .= " dim06% dim12% dim18% dim25% dim31% dim37% dim43% dim50% dim56% dim62% dim68% dim75% dim81% dim87% dim93% dim100%" if( AttrVal($hash->{NAME}, "subType", "colordimmer") =~ m/dimmer/ );
$list .= " rgb:colorpicker,RGB color:slider,2000,1,6500 ct:slider,154,1,500 hue:slider,0,1,65535 sat:slider,0,1,254 xy effect:none,colorloop" if( AttrVal($hash->{NAME}, "subType", "colordimmer") =~ m/color/ );

View File

@ -80,7 +80,7 @@ speedtest_Set($$@)
return undef;
}
my $list = "statusRequest";
my $list = "statusRequest:noArg";
return "Unknown argument $cmd, choose one of $list";
}

View File

@ -305,9 +305,9 @@ SWAP_Set($@)
my $ll = GetLogLevel($name,3);
my $list = "regGet regSet";
$list .= " statusRequest";
$list .= " readDeviceXML";
$list .= " clearUnconfirmed";
$list .= " statusRequest:noArg";
$list .= " readDeviceXML:noArg";
$list .= " clearUnconfirmed:noArg";
if( my $sl = $modules{$hash->{TYPE}}{SWAP_SetList} ) {
@ -328,7 +328,12 @@ SWAP_Set($@)
}
}
$list .= " " . join(" ", sort keys %{$sl});
foreach my $cmd ( sort keys ( %{$sl} ) ) {
$list .= " ";
$list .= $cmd;
$list .= ":noArg" if( !$sl->{$cmd} );
}
#$list .= " " . join(" ", sort keys %{$sl});
}
if( $hash->{reg} ) {

View File

@ -140,7 +140,7 @@ panStamp_Set($@)
my $cmd = shift @a;
my $arg = join("", @a);
my $list = "discover raw";
my $list = "discover raw:noArg";
return $list if( $cmd eq '?' );
if($cmd eq "raw") {