From eb44c5751657947a65a71520b5ca31b7ee916d7c Mon Sep 17 00:00:00 2001
From: bentele <>
Date: Sun, 15 Jun 2014 11:12:17 +0000
Subject: [PATCH] vbs - problem fixed for "undef" messages in log

git-svn-id: https://svn.fhem.de/fhem/trunk@6118 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/70_STV.pm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/fhem/FHEM/70_STV.pm b/fhem/FHEM/70_STV.pm
index 7ee3b0293..989166dcf 100644
--- a/fhem/FHEM/70_STV.pm
+++ b/fhem/FHEM/70_STV.pm
@@ -96,10 +96,12 @@ sub STV_Ready($)
     elsif(!$hash->{CHILDPID}) {
       return if($hash->{CHILDPID} = fork);
       my $ppid = getppid();
-  
-      ### Copied from Blocking.pm
+
+	  ### Copied from Blocking.pm
       foreach my $d (sort keys %defs) {   # Close all kind of FD
         my $h = $defs{$d};
+        #the following line was added by vbs to not close parent's DbLog DB handle
+        $h->{DBH}->{InactiveDestroy} = 1 if ($h->{TYPE} eq 'DbLog');
         TcpServer_Close($h) if($h->{SERVERSOCKET});
         if($h->{DeviceName}) {
           require "$attr{global}{modpath}/FHEM/DevIo.pm";
@@ -561,7 +563,7 @@ sub STV_Set($@)
        return $hash->{".validcommands"};
   }
   if ($hash->{".validcommands"} =~ /$cmd/) {
-    if ((AttrVal($name, "setWhenOffline", undef) eq "ignore") and ($hash->{STATE} ne "opened")) {
+    if ((AttrVal($name, "setWhenOffline", "execute") eq "ignore") and ($hash->{STATE} ne "opened")) {
       Log3 $name, 3, "[STV] Device seems offline. Set command ignored: $cmd";
       return;
     }