From 62b04fa407f7f473a2d56cf8498466032f16d9a4 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Sun, 19 Oct 2014 16:03:13 +0000 Subject: [PATCH] 91_eventTypes.pm: ignore multiline messages (Forum #27863) git-svn-id: https://svn.fhem.de/fhem/trunk@6792 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/91_eventTypes.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/91_eventTypes.pm b/fhem/FHEM/91_eventTypes.pm index d2be7064b..6b18e443e 100755 --- a/fhem/FHEM/91_eventTypes.pm +++ b/fhem/FHEM/91_eventTypes.pm @@ -74,12 +74,13 @@ eventTypes_Notify($$) my $ret = ""; foreach my $oe (@{$events}) { $oe = "" if(!defined($oe)); - next if($oe =~ m/ CULHM (SND|RCV) /); + $oe =~ s/\n.*//s; + next if($oe =~ m/ CULHM (SND|RCV) /); # ignore CUL_HM debugging next if($oe =~ m/ UNKNOWNCODE /); my $ne = $oe; $ne =~ s/\b-?\d*\.?\d+\b/.*/g; - $ne =~ s/set_\d+/set_.*/; # HM special :/ + $ne =~ s/set_\d+/set_.*/; # another HM special :/ next if(!defined($ne) || $ne eq ""); Log3 $ln, 4, "$ln: $t $n $oe -> $ne"; $modules{eventTypes}{ldata}{$n}{$ne}++;