From 45afed5b36171095a4b33a008c01c6ef3b07f06d Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 6 Apr 2014 07:36:38 +0000
Subject: [PATCH] CUL: speed100 bugfix from Martin

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5454 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/00_CUL.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fhem/FHEM/00_CUL.pm b/fhem/FHEM/00_CUL.pm
index 022a781c6..4704ae9bb 100755
--- a/fhem/FHEM/00_CUL.pm
+++ b/fhem/FHEM/00_CUL.pm
@@ -617,7 +617,6 @@ CUL_WriteTranslate($$$)
     $msg = substr($msg,6,4) . substr($msg,10);
 
   } elsif($fn eq "cmd") {                                  # internal command
-    $msg = "";
     if($msg eq "speed100") { 
       $fn = "AR";
     } elsif($msg eq "speed10") {
@@ -625,6 +624,7 @@ CUL_WriteTranslate($$$)
     } else {                                        # by default rewrite init
       $fn = $hash->{initString};
     }
+    $msg = "";
 
   } else {
     Log3 $hash, 2, "CUL cannot translate $fn $msg";