Color.pm: hsv2hex bug fix

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@10755 2b470e98-0d58-463d-a4d8-8e2adae1ed80
2016-02-07 18:17:53 +00:00
parent 063d8cbf19
commit 5b1c1e1f37
1 changed files with 2 additions and 2 deletions
--- a/fhem/FHEM/Color.pm
+++ b/fhem/FHEM/Color.pm
@@ -257,9 +257,9 @@ hex2hsv($) {
 sub
 hsv2hex($$$) {
    my ( $h, $s, $v ) = @_;
-    my @rgb = Color::hsv2rgb( $h, $s, $v );
+    my ($r,$g,$b) = Color::hsv2rgb( $h, $s, $v );

-    return Color::rgb2hex( $rgb[0], $rgb[1], $rgb[2] );
+    return Color::rgb2hex( $r*255, $g*255, $b*255 );
 }