2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 06:39:11 +00:00

93_DbRep: attribute timeout set for minTimestamp

git-svn-id: https://svn.fhem.de/fhem/trunk@17810 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2018-11-21 21:58:18 +00:00
parent e536954966
commit 8bddf63598
2 changed files with 9 additions and 6 deletions

View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it.
- change: 93_DbRep: attribute timeout set for minTimestamp
- feature: 73_AutoShuttersControl: change hardLockOut mode code
- bugfix: 73_AutoShuttersControl: bug line 623
- feature: 73_AutoShuttersControl: add lockOut support at Z-Wave

View File

@ -57,6 +57,7 @@ no if $] >= 5.017011, warnings => 'experimental::smartmatch';
# Versions History intern
our %DbRep_vNotesIntern = (
"8.9.7" => "21.11.2018 DbRep_firstconnect now uses attribute \"timeout\" ",
"8.9.6" => "15.11.2018 fix PERL WARNING: Use of uninitialized value \$fref in pattern match (m//), sub DbRep_sec2hms for hms transforming",
"8.9.5" => "09.11.2018 hash %dbrep_col substituted by get data from dblog device in func DbRep_firstconnect, fix importFromFile contains only SPACE ",
"8.9.0" => "07.11.2018 command delDoublets added ",
@ -1349,12 +1350,12 @@ return undef;
sub DbRep_firstconnect(@) {
my ($string) = @_;
my ($name,$opt,$prop,$fret) = split("\\|", $string);
my $hash = $defs{$name};
my $to = "120";
my $hash = $defs{$name};
my $to = AttrVal($name, "timeout", "86400");
$hash->{dbloghash} = $defs{$hash->{HELPER}{DBLOGDEVICE}};
my $dbloghash = $hash->{dbloghash};
my $dbconn = $dbloghash->{dbconn};
my $dbuser = $dbloghash->{dbuser};
my $dbloghash = $hash->{dbloghash};
my $dbconn = $dbloghash->{dbconn};
my $dbuser = $dbloghash->{dbuser};
RemoveInternalTimer($hash, "DbRep_firstconnect");
return if(IsDisabled($name));
@ -1425,7 +1426,8 @@ sub DbRep_getInitData($) {
my $brt = tv_interval($bst);
$rt = $rt.",".$brt;
no warnings 'uninitialized';
no warnings 'uninitialized';
Log3 ($name, 3, "DbRep $name - Initial data information retrieved successfully - total time used: $brt seconds");
return "$name|$mints|$rt|0|$opt|$prop|$fret";
}