setList added to dummy

git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@1422 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2012-04-08 08:29:00 +00:00
parent b32a807de8
commit dbb961341e
4 changed files with 16 additions and 10 deletions

View File

@@ -12,7 +12,7 @@ dummy_Initialize($)
$hash->{SetFn} = "dummy_Set";
$hash->{DefFn} = "dummy_Define";
$hash->{AttrList} = "loglevel:0,1,2,3,4,5,6";
$hash->{AttrList} = "loglevel:0,1,2,3,4,5,6 setList";
}
###################################
@@ -20,13 +20,13 @@ sub
dummy_Set($@)
{
my ($hash, @a) = @_;
return "no set value specified" if(int(@a) < 2);
return "Unknown argument $a[1], choose one of *" if($a[1] eq "?");
my $name = shift @a;
my $v = join(" ", @a);
return "no set value specified" if(int(@a) < 1);
my $setList = AttrVal($name, "setList", "*");
return "Unknown argument ?, choose one of $setList" if($a[0] eq "?");
my $v = join(" ", @a);
Log GetLogLevel($name,2), "dummy set $name $v";
$hash->{CHANGED}[0] = $v;