mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-02-07 23:09:26 +00:00
93_DbLog: contrib 5.3.0
git-svn-id: https://svn.fhem.de/fhem/trunk@26795 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
eeba508be2
commit
88338a1fa0
@ -1471,7 +1471,7 @@ sub DbLog_Log {
|
|||||||
|
|
||||||
my $log4rel = $vb4show && !$hash->{HELPER}{LONGRUN_PID} ? 1 : 0;
|
my $log4rel = $vb4show && !$hash->{HELPER}{LONGRUN_PID} ? 1 : 0;
|
||||||
|
|
||||||
if(AttrVal ($name, 'verbose', 3) =~ /[45]/) {
|
if(AttrVal ($name, 'verbose', 3) =~ /[45]/xs) {
|
||||||
if($log4rel) {
|
if($log4rel) {
|
||||||
Log3 ($name, 4, "DbLog $name - ################################################################");
|
Log3 ($name, 4, "DbLog $name - ################################################################");
|
||||||
Log3 ($name, 4, "DbLog $name - ### start of new Logcycle ###");
|
Log3 ($name, 4, "DbLog $name - ### start of new Logcycle ###");
|
||||||
@ -2870,7 +2870,7 @@ sub DbLog_execMemCacheSync {
|
|||||||
|
|
||||||
my $name = $hash->{NAME};
|
my $name = $hash->{NAME};
|
||||||
|
|
||||||
if(AttrVal ($name, 'verbose', 3) =~ /[45]/) {
|
if(AttrVal ($name, 'verbose', 3) =~ /[45]/xs) {
|
||||||
Log3 ($name, 4, "DbLog $name - ################################################################");
|
Log3 ($name, 4, "DbLog $name - ################################################################");
|
||||||
Log3 ($name, 4, "DbLog $name - ### New database processing cycle - SBP synchronous ###");
|
Log3 ($name, 4, "DbLog $name - ### New database processing cycle - SBP synchronous ###");
|
||||||
Log3 ($name, 4, "DbLog $name - ################################################################");
|
Log3 ($name, 4, "DbLog $name - ################################################################");
|
||||||
@ -2880,7 +2880,7 @@ sub DbLog_execMemCacheSync {
|
|||||||
my $memc;
|
my $memc;
|
||||||
|
|
||||||
for my $key (sort(keys %{$data{DbLog}{$name}{cache}{memcache}})) {
|
for my $key (sort(keys %{$data{DbLog}{$name}{cache}{memcache}})) {
|
||||||
Log3 ($name, 5, "DbLog $name - MemCache contains: $key -> ".$data{DbLog}{$name}{cache}{memcache}{$key});
|
Log3 ($name, 5, "DbLog $name - Store contains: $key -> ".$data{DbLog}{$name}{cache}{memcache}{$key});
|
||||||
|
|
||||||
$memc->{cdata}{$key} = delete $data{DbLog}{$name}{cache}{memcache}{$key}; # Subprocess Daten, z.B.: 2022-11-29 09:33:32|SolCast|SOLARFORECAST||nextCycletime|09:33:47|
|
$memc->{cdata}{$key} = delete $data{DbLog}{$name}{cache}{memcache}{$key}; # Subprocess Daten, z.B.: 2022-11-29 09:33:32|SolCast|SOLARFORECAST||nextCycletime|09:33:47|
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user