Fixed typo in deletereadings

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@2535 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2013-01-20 09:21:35 +00:00
parent de3cb5e2d2
commit a47acca050

View File

@@ -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";
}