mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

contrib/InfoPanel: added some more logging

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@7876 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen
2015-02-04 22:08:59 +00:00
parent 202124167d
commit d2bc027c7d
1 changed files with 9 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
fhem/contrib/InfoPanel/55_InfoPanel.pm
View File

@@ -36,6 +36,7 @@ no if $] >= 5.017011, warnings => 'experimental::smartmatch';
#sub InfoPanel_Initialize($);
sub btIP_Define($$);
sub btIP_Undef($$);
sub btIP_Set;
sub btIP_Notify;
sub btIP_readLayout($);
@@ -56,9 +57,10 @@ sub btIP_itemSeconds;
sub btIP_itemText;
sub btIP_itemTextBox;
sub btIP_itemTime;
sub btIP_itemImg;
sub btIP_itemTrash;
sub btIP_color;
sub btIP_xy;
sub btIP_changeColor;
sub btIP_ReturnSVG($);
sub btIP_evalLayout($$@);
@@ -564,7 +566,12 @@ sub btIP_changeColor {
binmode(GRAFIK);
$readBytes = read(GRAFIK, $data, $length);
close(GRAFIK);
$data =~ s/#$oldcolor/#$newcolor/g;
if($newcolor =~ /[[:xdigit:]]{6}/) {
$data =~ s/fill="#$oldcolor"/fill="#$newcolor"/g;
$data =~ s/fill:#$oldcolor/fill:$newcolor/g;
} else {
Log3(undef,4,"Infopanel: invalid rgb value for changeColor!");
}
return $data;
}