From d5d3635f79741ede301aca4cfd26cbf795ccc78a Mon Sep 17 00:00:00 2001 From: Damian <> Date: Sat, 13 Feb 2021 21:15:20 +0000 Subject: [PATCH] 98_DOIF.pm: ring-SVG-functions improvements git-svn-id: https://svn.fhem.de/fhem/trunk@23738 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_DOIF.pm | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) diff --git a/fhem/FHEM/98_DOIF.pm b/fhem/FHEM/98_DOIF.pm index 808064553..e28fb92a6 100644 --- a/fhem/FHEM/98_DOIF.pm +++ b/fhem/FHEM/98_DOIF.pm @@ -4625,7 +4625,7 @@ sub ring my ($val,$min,$max,$minColor,$maxColor,$unit,$size,$func,$dec,$model,$lr,$ln,$icon) = @_; my $out; - my ($ic,$iscale,$ix,$iy); + my ($ic,$iscale,$ix,$iy)=(); if (defined ($icon)) { ($ic,$iscale,$ix,$iy,)=split(",",$icon); @@ -4640,6 +4640,7 @@ sub ring $iy=9; }; $iscale=1 if (!defined($iscale)); + $ic="" if (!defined($ic)); } my ($format,$value); @@ -4685,8 +4686,9 @@ sub ring $minColor=$currColor; } } - - $ic="$ic\@".color($currColor,$ln) if (defined($icon) and $icon !~ /@/); + if (defined $icon and $icon ne "") { + $ic="$ic\@".color($currColor,$ln) if ($icon !~ /@/); + } $out.= sprintf('',$size/100*(defined($icon)?61:60),$size/100*(defined($icon)?57:55)); $out.= ''; @@ -4698,8 +4700,8 @@ sub ring '; $out.=''; - $out.=''; - $out.=sprintf(''); + $out.=''; + $out.=sprintf(''); $out.=describeArc(40, 30, (defined($icon)?27.5:26.5), 0, 280); $out.=''; ##$out.=sprintf(''); @@ -4717,10 +4719,10 @@ sub ring #$out.=sprintf('',color ($maxColor)); #$out.=describeArc(40, 30, 26, 270, 280); #$out.=''; - $out.=sprintf('',$currColor,$minColor,(defined $lr ? $lr:-1)); + $out.=sprintf('',$currColor,$minColor,(defined $lr ? $lr:-1)); $out.=describeArc(40, 30, (defined($icon)?27.5:26.5), 0, int($prop*280)); $out.=''; - if (defined $icon and $icon ne "") { + if (defined $icon and $icon ne "" and $icon ne " ") { $out.=''; $out.= ::FW_makeImage($ic); $out.=''; @@ -4728,8 +4730,8 @@ sub ring $out.='';#height="18" width="18" ##$out.=''; } - $out.= sprintf('%s',(defined ($icon) ? 43:34),color($currColor,$ln),(defined ($icon) ? 14:18),sprintf($format,$val)); - $out.= sprintf('%s',(defined ($icon) ? 53:47),color($currColor,$ln),$unit) if (defined $unit); + $out.= sprintf('%s',((defined ($icon) and $icon ne "") ? 43:34),color($currColor,$ln),(defined ($icon) ? 14:18),sprintf($format,$val)); + $out.= sprintf('%s',((defined ($icon) and $icon ne "") ? 53:47),color($currColor,$ln),$unit) if (defined $unit); $out.= ''; return ($out); }