From 4bf6608e9ba30043dc4577e0db0907134663b531 Mon Sep 17 00:00:00 2001
From: wherzig <>
Date: Sun, 15 Sep 2013 17:40:40 +0000
Subject: [PATCH] correction X10 KR18

git-svn-id: https://svn.fhem.de/fhem/trunk@3908 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/46_TRX_SECURITY.pm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/fhem/FHEM/46_TRX_SECURITY.pm b/fhem/FHEM/46_TRX_SECURITY.pm
index 59dd246ab..cbf574f78 100755
--- a/fhem/FHEM/46_TRX_SECURITY.pm
+++ b/fhem/FHEM/46_TRX_SECURITY.pm
@@ -426,15 +426,14 @@ sub TRX_SECURITY_parse_X10Sec($$) {
 
   my $current = "";
 
-  Log3 $name, 5, "TRX_SECURITY_parse_X10Sec() $name devn=$device_name first=$firstdevice subtype=$subtype command=$command, delay=$delay, batt=$battery cmd=$hexdata";
-
-
   my $n = 0;
   my $tm = TimeNow();
   my $val = "";
 
   my $device_type = uc($def->{TRX_SECURITY_type});
 
+  Log3 $name, 5, "TRX_SECURITY_parse_X10Sec() $name devn=$device_name first=$firstdevice subtype=$subtype device_type=$device_type command=$command, delay=$delay, batt=$battery cmd=$hexdata";
+
   my $sensor = "";
 
   if ($device_type eq "SD90") {
@@ -479,7 +478,7 @@ sub TRX_SECURITY_parse_X10Sec($$) {
 
 	$current = "Security-Panic" if ($command eq "alert");
 
-	my @cmd_split = split(/-/, $command);
+	my @cmd_split = split(/-/, $current);
 	$sensor = $cmd_split[0];
 	$current = $cmd_split[1];
 	readingsBulkUpdate($def, $sensor, $current);