From d87297890c3744dd0775abafde6f64397498aca9 Mon Sep 17 00:00:00 2001 From: nasseeder1 Date: Mon, 17 Feb 2020 20:00:18 +0000 Subject: [PATCH] 57_SSCal: contrib 1.12.0 git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@21217 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- contrib/DS_Starter/57_SSCal.pm | 15 ++++++--------- 1 file changed, 6 insertions(+), 9 deletions(-) diff --git a/contrib/DS_Starter/57_SSCal.pm b/contrib/DS_Starter/57_SSCal.pm index 63ab656ab..181d2ab3a 100644 --- a/contrib/DS_Starter/57_SSCal.pm +++ b/contrib/DS_Starter/57_SSCal.pm @@ -2227,15 +2227,12 @@ sub SSCal_createATdevices ($$$) { my $room = AttrVal($name, "room", ""); - # foreach my $bnr (@{$abnr}) { - # $id = ReadingsVal($name, $bnr."_98_EventId", ""); - @devs = devspec2array("TYPE=at:FILTER=NAME=SSCal.$name.*"); - foreach (@devs) { - next if(!$defs{$_}); - Log3($name, 4, "$name - delete device: $_"); - CommandDelete(undef,$_); - } - # } + @devs = devspec2array("TYPE=at:FILTER=NAME=SSCal.$name.*"); + foreach (@devs) { + next if(!$defs{$_}); + Log3($name, 4, "$name - delete device: $_"); + CommandDelete(undef,$_); + } foreach my $bnr (@{$abnr}) { $summary = ReadingsVal($name, $bnr."_01_Summary", "");