From c59f1735dadb1fc46bae754d3797bc32cb154b00 Mon Sep 17 00:00:00 2001 From: "michael.winkler" <> Date: Mon, 11 Sep 2017 20:02:52 +0000 Subject: [PATCH] 70_NEUTRINO: bugfixes git-svn-id: https://svn.fhem.de/fhem/trunk@15051 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/70_NEUTRINO.pm | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/fhem/FHEM/70_NEUTRINO.pm b/fhem/FHEM/70_NEUTRINO.pm index e9a277fcc..9bd44e672 100644 --- a/fhem/FHEM/70_NEUTRINO.pm +++ b/fhem/FHEM/70_NEUTRINO.pm @@ -1,6 +1,9 @@ # $Id$ ############################################################################ -# 2017-08-28, v1.0.11 +# 2017-09-11, v1.0.12 +# +# v1.0.12 +# - BUFIX: $_ ersetzt durch $uResult # # v1.0.11 # - BUFIX: Code Optimierungen @@ -528,8 +531,8 @@ sub NEUTRINO_Set($@) { Log3 $name, 5, "NEUTRINO $name [NEUTRINO_Set] [" . $a[1] . "] " . $a[2]; if ( $state eq "on" ) { - my $_ = $a[2]; - if ( m/^\d+$/ && $_ >= 0 && $_ <= 100 ) { + my $uResult = $a[2]; + if ( m/^\d+$/ && $uResult >= 0 && $uResult <= 100 ) { $cmd = $a[2]; } else { @@ -599,7 +602,7 @@ sub NEUTRINO_Set($@) { } if ( $state eq "on" ) { - my $_ = $a[2]; + my $uResult = $a[2]; my $channellistname; #2017.07.19 - Plus Zeichen im Name erkennen