From a043b3ff99eabf4b73b8d6478d4c0d19b6cb262e Mon Sep 17 00:00:00 2001
From: justme1968 <justme1968@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 16 Nov 2014 09:48:32 +0000
Subject: [PATCH] 10_IT.pm: Fix for CUL disconnect with ITrepetition or
 ITfrequency (forum:
 http://forum.fhem.de/index.php/topic,27024.msg199787.html#msg199787)

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@6996 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_IT.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/fhem/FHEM/10_IT.pm b/fhem/FHEM/10_IT.pm
index 65557968a..91c12320e 100644
--- a/fhem/FHEM/10_IT.pm
+++ b/fhem/FHEM/10_IT.pm
@@ -130,7 +130,7 @@ IT_Set($@)
   ## Do we need to change ITrepetition ??	
   if(defined($attr{$name}) && defined($attr{$name}{"ITrepetition"})) {
   	$message = "isr".$attr{$name}{"ITrepetition"};
-		CUL_SimpleWrite($io, $message);
+                CallFn($io->{NAME}, "GetFn", $io, (" ", "raw", $message));
 		Log GetLogLevel($name,4), "IT set ITrepetition: $message for $io->{NAME}";
 	}
 
@@ -143,7 +143,7 @@ IT_Set($@)
     
     my $arg = sprintf("%.3f", (hex($f2)*65536+hex($f1)*256+hex($f0))/65536*26);
     Log GetLogLevel($name,4), "Setting ITfrequency (0D,0E,0F) to $f2 $f1 $f0 = $arg MHz";
-    CUL_SimpleWrite($hash, "if$f2$f1$f0");
+    CallFn($io->{NAME}, "GetFn", $io, (" ", "raw", "if$f2$f1$f0"));
 	}
 	
   my $v = $name ." ". join(" ", @a);
@@ -164,14 +164,14 @@ IT_Set($@)
   ## Do we need to change ITrepetition back??	
   if(defined($attr{$name}) && defined($attr{$name}{"ITrepetition"})) {
   	$message = "isr".$it_defrepetition;
-		CUL_SimpleWrite($io, $message);
+                CallFn($io->{NAME}, "GetFn", $io, (" ", "raw", $message));
 		Log GetLogLevel($name,4), "IT set ITrepetition back: $message for $io->{NAME}";
 	}
 
   ## Do we need to change ITfrequency back??	
   if(defined($attr{$name}) && defined($attr{$name}{"ITfrequency"})) {
     Log GetLogLevel($name,4), "Setting ITfrequency back to 433.92 MHz";
-    CUL_SimpleWrite($hash, "if0");
+    CallFn($io->{NAME}, "GetFn", $io, (" ", "raw", "if0"));
 	}
 
 	## Do we need to change RFMode back to HomeMatic??