From d6d87abb7ec55c744d0f0e8155052dfa700ed4d5 Mon Sep 17 00:00:00 2001
From: betateilchen <betateilchen@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Fri, 5 Apr 2024 12:07:59 +0000
Subject: [PATCH] 55_InfoPanel.pm: remove smartmatch issues

git-svn-id: https://svn.fhem.de/fhem/trunk@28758 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/55_InfoPanel.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/55_InfoPanel.pm b/fhem/FHEM/55_InfoPanel.pm
index 90450a131..f97b53621 100644
--- a/fhem/FHEM/55_InfoPanel.pm
+++ b/fhem/FHEM/55_InfoPanel.pm
@@ -1059,7 +1059,7 @@ sub btIP_evalLayout {
 	      $params{xx} = $x;
 	      $params{yy} = $y;
 	      $svg .= btIP_itemDate($id,$x,$y,%params);
-	    } "ellipse") {
+	    } elsif ($cmd eq "ellipse") {
 	      ($id,$x1,$y1,$rx,$ry,$filled,$stroked,$link)= split("[ \t]+", $def, 8);
 	      ($x1,$y1) = btIP_xy($x1,$y1,%params);
               ($rx,$ry) = btIP_xy($rx,$ry,%params);
@@ -1070,7 +1070,7 @@ sub btIP_evalLayout {
 	      $link //= "";
           $link = AnalyzePerlCommand(undef,$link);
 	      $svg .= btIP_itemEllipse($id,$x1,$y1,$rx,$ry,$filled,$stroked,$link,%params);
-	    } "embed") {
+	    } elsif ($cmd eq "embed") {
 	      ($id,$x,$y,$width,$height,$arg)= split("[ \t]+", $def, 6);
 	      ($x,$y)= btIP_xy($x,$y,%params);
 	      ($width,$height)= btIP_xy($width,$height,%params);