10_CUL_HM:implement noArg
git-svn-id: https://svn.fhem.de/fhem/trunk@12893 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -3904,11 +3904,13 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
|
|||||||
@arr1 = CUL_HM_noDup(@arr1);
|
@arr1 = CUL_HM_noDup(@arr1);
|
||||||
foreach(@arr1){
|
foreach(@arr1){
|
||||||
my ($cmd,$val) = split(":",$_,2);
|
my ($cmd,$val) = split(":",$_,2);
|
||||||
if (!$val ||
|
if (!$val){ # no agruments possible
|
||||||
$val !~ m/^\[.*\]$/ ||
|
$_ = "$cmd:noArg";
|
||||||
$val =~ m/\[.*\[/ ||
|
}
|
||||||
$val =~ m/(\<|\>)]/
|
elsif($val !~ m/^\[.*\]$/ ||
|
||||||
){
|
$val =~ m/\[.*\[/ ||
|
||||||
|
$val =~ m/(\<|\>)]/
|
||||||
|
){
|
||||||
$_ = $cmd;
|
$_ = $cmd;
|
||||||
}
|
}
|
||||||
else{
|
else{
|
||||||
@@ -3929,7 +3931,6 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
|
|||||||
$usg =~ s/ pct/ pct:slider,0,1,100/;
|
$usg =~ s/ pct/ pct:slider,0,1,100/;
|
||||||
$usg =~ s/ virtual/ virtual:slider,1,1,50/;
|
$usg =~ s/ virtual/ virtual:slider,1,1,50/;
|
||||||
$usg =~ s/ color/ color:colorpicker,HUE,0,0.5,100/;
|
$usg =~ s/ color/ color:colorpicker,HUE,0,0.5,100/;
|
||||||
$usg =~ s/ colProgram/ colProgram:0,1,2,3,4,5,6/;
|
|
||||||
if ($usg =~ m/ tempTmplSet/){
|
if ($usg =~ m/ tempTmplSet/){
|
||||||
my $tl = $modules{CUL_HM}{AttrList};
|
my $tl = $modules{CUL_HM}{AttrList};
|
||||||
my $ok = ($tl =~ s/.* (tempListTmpl)(\:.*? ).*/$2/);
|
my $ok = ($tl =~ s/.* (tempListTmpl)(\:.*? ).*/$2/);
|
||||||
|
|||||||
Reference in New Issue
Block a user