From 8c7d55ca0c84d5f30093c0e17a0d062b16f4ba76 Mon Sep 17 00:00:00 2001 From: nasseeder1 Date: Sun, 5 Apr 2020 06:43:12 +0000 Subject: [PATCH] 93_Log2Syslog: contrib 5.10.0 git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@21600 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- contrib/DS_Starter/93_Log2Syslog.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/contrib/DS_Starter/93_Log2Syslog.pm b/contrib/DS_Starter/93_Log2Syslog.pm index 8b41efb89..70bc367cf 100644 --- a/contrib/DS_Starter/93_Log2Syslog.pm +++ b/contrib/DS_Starter/93_Log2Syslog.pm @@ -496,6 +496,7 @@ sub Log2Syslog_Read { # parse Payload my (@load,$mlen,$msg,$tail); if($data =~ /^(?(\d+))\s(?.*)/s) { # Syslog Sätze mit Octet Count -> Transmission of Syslog Messages over TCP https://tools.ietf.org/html/rfc6587 + Log2Syslog_Log3slog ($hash, 4, "Log2Syslog $name - Datagramm with Octet Count detected - prepare message for Parsing ... \n"); my $i = 0; $mlen = $+{mlen}; $tail = $+{tail}; @@ -509,7 +510,7 @@ sub Log2Syslog_Read { $tail = ""; } - Log2Syslog_Log3slog ($hash, 5, "Log2Syslog $name -> LEN$i: $mlen, MSG$i: $msg, TAIL$i: $tail"); + Log2Syslog_Log3slog ($hash, 5, "Log2Syslog $name -> LEN$i: $mlen, MSG$i: $msg, TAIL$i: $tail \n"); while($tail && $tail =~ /^(?(\d+))\s(?.*)/s) { $i++;