added groups command

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@4332 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2013-12-06 22:22:17 +00:00
parent 151e7f5d9e
commit 04cff66fc2

View File

@ -192,8 +192,16 @@ HUEBridge_Get($@)
$ret .= $key .": ". $result->{$key}{name} ."\n";
}
return $ret;
} elsif($cmd eq 'groups') {
my $result = HUEBridge_Call($hash, 'groups', undef);
$result->{0} = { name => "Lightset 0", };
my $ret = "";
foreach my $key ( sort keys %$result ) {
$ret .= $key .": ". $result->{$key}{name} ."\n";
}
return $ret;
} else {
return "Unknown argument $cmd, choose one of devices:noArg";
return "Unknown argument $cmd, choose one of devices:noArg groups:noArg";
}
}
@ -523,6 +531,8 @@ HUEBridge_HTTP_Request($$$@)
<ul>
<li>devices<br>
list the devices known to the bridge.</li>
<li>groups<br>
list the groups known to the bridge.</li>
</ul><br>
<a name="HUEBridge_Set"></a>