Fixed typo in deletereadings

git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@2535 2b470e98-0d58-463d-a4d8-8e2adae1ed80
2013-01-20 09:21:35 +00:00
parent dfb995dd06
commit 4054f09c3e
1 changed files with 2 additions and 1 deletions
--- a/fhem.pl
+++ b/fhem.pl
@@ -1441,7 +1441,8 @@ CommandDeleteReading($$)
    $a[0] = $sdev;
    my $readingspec= '^' . $a[1] . '$';

-    foreach my $reading (grep { /$readingspec/ } keys ($defs{$sdev}{READINGS})) {
+    foreach my $reading (grep { /$readingspec/ }
+                                keys %{$defs{$sdev}{READINGS}} ) {
      delete($defs{$sdev}{READINGS}{$reading});
      push @rets, "Deleted reading $reading for device $sdev";
    }