From b089c4bc34cba66fe698f9958b358a9f3dcf774e Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Wed, 17 Feb 2016 07:00:32 +0000
Subject: [PATCH] 10_ZWave.pm: reset $@ for Windows/new Perl ? (Forum #49444)

git-svn-id: https://svn.fhem.de/fhem/trunk@10866 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_ZWave.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/fhem/FHEM/10_ZWave.pm b/fhem/FHEM/10_ZWave.pm
index 7ee438969..10f3b864e 100755
--- a/fhem/FHEM/10_ZWave.pm
+++ b/fhem/FHEM/10_ZWave.pm
@@ -805,6 +805,7 @@ ZWave_Cmd($$@)
 
   } else {
     $cmdFmt = sprintf($cmdFmt, @a) if($nArg);
+    $@ = undef;
     my ($err, $ncmd) = eval($cmdFmt) if($cmdFmt !~ m/^\d/);
     return $err if($err);
     return $@ if($@);