From 91f58a93796309f89c46c59cdc8005e5edbe368b Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Mon, 25 Apr 2011 15:52:32 +0000
Subject: [PATCH] at error reporting fix

git-svn-id: https://svn.fhem.de/fhem/trunk@897 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/90_at.pm | 2 +-
 fhem/fhem.pl       | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/fhem/FHEM/90_at.pm b/fhem/FHEM/90_at.pm
index 12d4e3ec2..12ff104e2 100755
--- a/fhem/FHEM/90_at.pm
+++ b/fhem/FHEM/90_at.pm
@@ -104,7 +104,7 @@ at_Exec($)
   my (undef, $command) = split("[ \t]+", $defs{$name}{DEF}, 2);
   $command = SemicolonEscape($command);
   my $ret = AnalyzeCommandChain(undef, $command) if(!$skip && !$disable);
-  Log 3, $ret if($ret);
+  Log GetLogLevel($name,3), $ret if($ret);
 
   return if(!$defs{$name});           # Deleted in the Command
 
diff --git a/fhem/fhem.pl b/fhem/fhem.pl
index a53e78367..89933fbe3 100755
--- a/fhem/fhem.pl
+++ b/fhem/fhem.pl
@@ -167,7 +167,7 @@ my $nextat;                     # Time when next timer will be triggered.
 my $intAtCnt=0;
 my %duplicate;                  # Pool of received msg for multi-fhz/cul setups
 my $duplidx=0;                  # helper for the above pool
-my $cvsid = '$Id: fhem.pl,v 1.137 2011-04-25 08:11:52 rudolfkoenig Exp $';
+my $cvsid = '$Id: fhem.pl,v 1.138 2011-04-25 15:52:32 rudolfkoenig Exp $';
 my $namedef =
   "where <name> is either:\n" .
   "- a single device name\n" .
@@ -1518,7 +1518,6 @@ GlobalAttr($$)
   my ($type, $me, $name, $val) = @_;
 
   return if($type ne "set");
-
   ################
   if($name eq "logfile") {
     my @t = localtime;