From d6bb6be67efb59e4d2d88eeebab8e7cf387c5829 Mon Sep 17 00:00:00 2001
From: nasseeder1 <>
Date: Tue, 18 Oct 2016 17:25:35 +0000
Subject: [PATCH] 93_DbRep: get svrinfo contains SQLite database file size (MB)

git-svn-id: https://svn.fhem.de/fhem/trunk@12376 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/93_DbRep.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/fhem/FHEM/93_DbRep.pm b/fhem/FHEM/93_DbRep.pm
index 511081741..6be5d176a 100644
--- a/fhem/FHEM/93_DbRep.pm
+++ b/fhem/FHEM/93_DbRep.pm
@@ -37,7 +37,8 @@
 ###########################################################################################################
 #  Versions History:
 #
-# 4.5.1        18.10.2016       get svrinfo contains SQLite database file size (MB)
+# 4.5.1        18.10.2016       get svrinfo contains SQLite database file size (MB),
+#                               modified timeout routine
 # 4.5          17.10.2016       get data of dbstatus, dbvars, tableinfo, svrinfo (database dependend)
 # 4.4          13.10.2016       get function prepared
 # 4.3          11.10.2016       Preparation of get metadata
@@ -3236,8 +3237,9 @@ return;
 sub ParseAborted($) {
 my ($hash) = @_;
 my $name = $hash->{NAME};
-
+my $dbh = $hash->{DBH}; 
   Log3 ($name, 1, "DbRep $name -> BlockingCall $hash->{HELPER}{RUNNING_PID}{fn} timed out");
+  $dbh->disconnect() if(defined($dbh));
   readingsSingleUpdate($hash, "state", "timeout", 1);
   delete($hash->{HELPER}{RUNNING_PID});
 }
@@ -3260,7 +3262,6 @@ return;
 
 sub collaggstr($$$$) {
  my ($hash,$runtime,$i,$runtime_string_next) = @_;
- 
  my $name = $hash->{NAME};
  my $runtime_string;                                               # Datum/Zeit im SQL-Format für Readingname Teilstring
  my $runtime_string_first;                                         # Datum/Zeit Auswertungsbeginn im SQL-Format für SQL-Statement