From 3085d8e90d28ae8ce85b461fe0a38dafd644e4d4 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Mon, 13 Jul 2015 16:01:48 +0000
Subject: [PATCH] 00_ZWave.pm: Fix for Windows  (forum #39053)

git-svn-id: https://svn.fhem.de/fhem/trunk@8954 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/00_ZWDongle.pm | 4 +++-
 fhem/FHEM/DevIo.pm       | 7 +++++++
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/00_ZWDongle.pm b/fhem/FHEM/00_ZWDongle.pm
index 33cba4b7e..179a40ca2 100755
--- a/fhem/FHEM/00_ZWDongle.pm
+++ b/fhem/FHEM/00_ZWDongle.pm
@@ -585,7 +585,9 @@ ZWave_ProcessSendStack($)
     ZWDongle_shiftSendStack($hash, 1, "ERROR: max send retries reached");
   }
   
-  return if(!@{$hash->{SendStack}} || $hash->{WaitForAck} || !$hash->{FD});
+  return if(!@{$hash->{SendStack}} ||
+               $hash->{WaitForAck} ||
+               !DevIo_IsOpen($hash));
   
   my $msg = $hash->{SendStack}->[0];
 
diff --git a/fhem/FHEM/DevIo.pm b/fhem/FHEM/DevIo.pm
index bfe130938..67db637b9 100644
--- a/fhem/FHEM/DevIo.pm
+++ b/fhem/FHEM/DevIo.pm
@@ -405,6 +405,13 @@ DevIo_CloseDev($@)
   delete($hash->{EXCEPT_FD});
 }
 
+sub
+DevIo_IsOpen($)
+{
+  my ($hash) = @_;
+  return ($hash->{TCPDev} || $hash->{USBDev} || $hash->{DIODev});
+}
+
 sub
 DevIo_Disconnected($)
 {