FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00
Code Issues Releases Wiki Activity

Adapting for CUL V.137 (; separated commands)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@620 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2010-04-17 12:54:42 +00:00
parent 76461d9540
commit 121ea36dbe
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/16_CUL_RFR.pm
View File

@ -93,10 +93,9 @@ CUL_RFR_Parse($$)
elsif($smsg =~ m/^K/) { $hash->{NR_KMSG}++ }
else { $hash->{NR_RMSG}++ }
$smsg = $1 if($smsg =~ m/^(E[0-9A-F]{20})[REFHKT]/); # Fixing a CUL/RFR bug
$smsg = $1 if($smsg =~ m/^(R[0-9A-F]{12})[REFHKT]/);
CUL_Parse($hash, $iohash, $hash->{NAME}, $smsg, "X21");
foreach my $m (split(";", $smsg)) {
CUL_Parse($hash, $iohash, $hash->{NAME}, $m, "X21");
}
return "";
}
@ -107,6 +106,7 @@ CUL_RFR_DelPrefix($)
while($msg =~ m/^\d{4}U/) {
(undef, $msg) = split("U", $msg, 2);
}
$msg =~ s/;([\r\n]*)$/$1/;
return $msg;
}