From b3993de5e2862aac4a8bdfbb1247f2367455bb0d Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Tue, 14 Mar 2017 16:01:36 +0000
Subject: [PATCH] fhem.pl: add lastWarningMsg (Forum #68986)

git-svn-id: https://svn.fhem.de/fhem/trunk@13700 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/fhem.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/fhem/fhem.pl b/fhem/fhem.pl
index c3848be4d..e5b58dc89 100755
--- a/fhem/fhem.pl
+++ b/fhem/fhem.pl
@@ -203,6 +203,7 @@ sub cfgDB_WriteFile($@);
 
 use vars qw($auth_refresh);
 use vars qw($cmdFromAnalyze);   # used by the warnings-sub
+use vars qw($lastWarningMsg);   # set by the warnings-sub
 use vars qw($cvsid);            # used in 98_version.pm
 use vars qw($devcount);         # Maximum device number, used for storing
 use vars qw($featurelevel); 
@@ -2988,6 +2989,7 @@ SignalHandling()
     my ($msg) = @_;
 
     return if($inWarnSub);
+    $lastWarningMsg = $msg;
     if(!$attr{global}{stacktrace} && $data{WARNING}{$msg}) {
       $data{WARNING}{$msg}++;
       return;
@@ -3497,7 +3499,7 @@ Dispatch($$$)
 
   foreach my $m (@{$clientArray}) {
     # Module is not loaded or the message is not for this module
-    next if($dmsg !~ m/$modules{$m}{Match}/i);
+    next if(!$modules{$m} || $dmsg !~ m/$modules{$m}{Match}/i);
 
     if( my $ffn = $modules{$m}{FingerprintFn} ) {
       ($isdup, $idx) = CheckDuplicate($name, $dmsg, $ffn);