From 71315f8c467cf694d0576d2bc953fcc1dbcb5ec1 Mon Sep 17 00:00:00 2001 From: svenson08 <> Date: Wed, 21 May 2014 18:47:19 +0000 Subject: [PATCH] Bugfix git-svn-id: https://svn.fhem.de/fhem/trunk@5921 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/95_Dashboard.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/95_Dashboard.pm b/fhem/FHEM/95_Dashboard.pm index e1c4616c4..88b9a9798 100644 --- a/fhem/FHEM/95_Dashboard.pm +++ b/fhem/FHEM/95_Dashboard.pm @@ -232,7 +232,7 @@ sub Dashboard_Get($@) { my $name = $hash->{NAME}; my $attrdata = $attr{$name}; if ($attrdata) { - my $x = keys $attrdata; + my $x = keys %$attrdata; my $i = 0; my @splitattr; $res .= "{\n"; @@ -246,7 +246,7 @@ sub Dashboard_Get($@) { $res .= " \"icondirs\": \"$iconDirs\""; $res .= ($i != $x) ? ",\n" : "\n"; - foreach my $attr (sort keys $attrdata) { + foreach my $attr (sort keys %$attrdata) { $i++; @splitattr = split("@", $attrdata->{$attr}); if (@splitattr == 2) {