mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-05-07 22:29:19 +00:00
30_HUEBridge.pm: get scenes detail output fix
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@21062 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
9a412d7830
commit
a3c05419db
@ -1076,7 +1076,7 @@ HUEBridge_Get($@)
|
|||||||
my $ret = "";
|
my $ret = "";
|
||||||
foreach my $key ( sort {$result->{$a}{name} cmp $result->{$b}{name}} keys %{$result} ) {
|
foreach my $key ( sort {$result->{$a}{name} cmp $result->{$b}{name}} keys %{$result} ) {
|
||||||
$ret .= sprintf( "%-20s %-25s %-10s", $key, $result->{$key}{name}, $result->{$key}{type} );
|
$ret .= sprintf( "%-20s %-25s %-10s", $key, $result->{$key}{name}, $result->{$key}{type} );
|
||||||
$ret .= sprintf( "%i %i %i %-40s %-20s", $result->{$key}{recycle}, $result->{$key}{locked},$result->{$key}{version}, $result->{$key}{owner}, $result->{$key}{lastupdated}?$result->{$key}{lastupdated}:'' ) if( $arg && $arg eq 'detail' );
|
$ret .= sprintf( " %i %i %i %-40s %-20s", $result->{$key}{recycle}, $result->{$key}{locked},$result->{$key}{version}, $result->{$key}{owner}, $result->{$key}{lastupdated}?$result->{$key}{lastupdated}:'' ) if( $arg && $arg eq 'detail' );
|
||||||
my $lights = "";
|
my $lights = "";
|
||||||
$lights = join( ",", @{$result->{$key}{lights}} ) if( $result->{$key}{lights} );
|
$lights = join( ",", @{$result->{$key}{lights}} ) if( $result->{$key}{lights} );
|
||||||
my $group = HUEbridge_groupOfLights($hash,$lights);
|
my $group = HUEbridge_groupOfLights($hash,$lights);
|
||||||
@ -1092,7 +1092,7 @@ HUEBridge_Get($@)
|
|||||||
}
|
}
|
||||||
if( $ret ) {
|
if( $ret ) {
|
||||||
my $header = sprintf( "%-20s %-25s %-10s", "ID", "NAME", "TYPE" );
|
my $header = sprintf( "%-20s %-25s %-10s", "ID", "NAME", "TYPE" );
|
||||||
$header .= sprintf( "%s %s %s %-40s %-20s", "R", "L", "V", "OWNER", "LAST UPDATE" ) if( $arg && $arg eq 'detail' );
|
$header .= sprintf( " %s %s %s %-40s %-20s", "R", "L", "V", "OWNER", "LAST UPDATE" ) if( $arg && $arg eq 'detail' );
|
||||||
$header .= sprintf( " %s\n", "LIGHTS" );
|
$header .= sprintf( " %s\n", "LIGHTS" );
|
||||||
$ret = $header . $ret;
|
$ret = $header . $ret;
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user