Multiple Dummy Set Arguments
git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@941 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -20,13 +20,14 @@ dummy_Set($@)
|
||||
{
|
||||
my ($hash, @a) = @_;
|
||||
|
||||
return "no set value specified" if(int(@a) != 2);
|
||||
return "no set value specified" if(int(@a) < 2);
|
||||
return "Unknown argument $a[1], choose one of *" if($a[1] eq "?");
|
||||
|
||||
|
||||
my $v = $a[1];
|
||||
my $name = shift @a;
|
||||
my $v = join(" ", @a);
|
||||
|
||||
Log GetLogLevel($a[0],2), "dummy set @a";
|
||||
Log GetLogLevel($name,2), "dummy set @a";
|
||||
|
||||
$hash->{CHANGED}[0] = $v;
|
||||
$hash->{STATE} = $v;
|
||||
|
||||
Reference in New Issue
Block a user