From b78b218cd673ae83cbca7bf0c7726bd07ac5da4a Mon Sep 17 00:00:00 2001
From: herrmannj <>
Date: Tue, 16 Jan 2018 20:58:44 +0000
Subject: [PATCH] 32_WifiLight.pm: replace timer remove with api (Forum #81365)

git-svn-id: https://svn.fhem.de/fhem/trunk@15907 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/32_WifiLight.pm | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/fhem/FHEM/32_WifiLight.pm b/fhem/FHEM/32_WifiLight.pm
index 9777b17e3..17b7b6592 100644
--- a/fhem/FHEM/32_WifiLight.pm
+++ b/fhem/FHEM/32_WifiLight.pm
@@ -3826,15 +3826,8 @@ sub
 WifiLight_HighLevelCmdQueue_Clear(@)
 {
   my ($ledDevice) = @_;
-  foreach my $a (keys %intAt) 
-  {
-    if (($intAt{$a}{ARG} eq $ledDevice) && ($intAt{$a}{FN} eq 'WifiLight_HighLevelCmdQueue_Exec'))
-    {
-
-      Log3 ($ledDevice, 4, "$ledDevice->{NAME} high level cmd queue clear, remove timer at ".$intAt{$a}{TRIGGERTIME} );
-      delete($intAt{$a}) ;
-    }
-  }
+  Log3 ($ledDevice, 4, "$ledDevice->{NAME} high level cmd queue clear");
+  RemoveInternalTimer($ledDevice, 'WifiLight_HighLevelCmdQueue_Exec');
   $ledDevice->{helper}->{hlCmdQueue} = [];
 }