Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix for '\(255 x @channels)' expanding to a string instead of an array

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@4325 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2013-12-05 12:56:02 +00:00
parent ec0095d792
commit 2200a5e224
1 changed files with 10 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
FHEM/Color.pm
View File

@ -118,23 +118,22 @@ ChannelsToRgb(@) {
sub
ChannelsToBrightness(@) {
my (@channels) = @_;
my $max = 0;
foreach my $value (@channels) {
$max = $value if ($max < $value);
}
return {
bri => 0,
channels => \(255 x @channels),
} unless ($max > 0);
my @bri = ();
my $norm = 255/$max;
foreach my $value (@channels) {
push @bri,int($value*$norm);
if( $max == 0) {
@bri = (0) x @channels;
} else {
my $norm = 255/$max;
foreach my $value (@channels) {
push @bri,int($value*$norm);
}
}
return {
bri => int($max/2.55),
channels => \@bri,