mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-04-07 12:58:13 +00:00
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
This commit is contained in:
parent
b652805af9
commit
b089c4bc34
@ -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($@);
|
||||
|
Loading…
x
Reference in New Issue
Block a user