From e263006ee5eedd90206a477e9470846f607dcadb Mon Sep 17 00:00:00 2001 From: 50watt <> Date: Fri, 30 Nov 2018 20:35:25 +0000 Subject: [PATCH] 70_PIONEERAVR: fix for inputslist git-svn-id: https://svn.fhem.de/fhem/trunk@17871 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/70_PIONEERAVR.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/70_PIONEERAVR.pm b/fhem/FHEM/70_PIONEERAVR.pm index df5270bdd..f72373837 100644 --- a/fhem/FHEM/70_PIONEERAVR.pm +++ b/fhem/FHEM/70_PIONEERAVR.pm @@ -274,12 +274,12 @@ sub PIONEERAVR_Define($$) { $inputNr = sprintf '%02d', $i; $inputindex = "PIONEERAVR_InputAlias_".$inputNr; my ($err, $data) = getKeyValue($inputindex); - if (!defined $err) { + if ((!defined $err) && ($data ne '')) { $hash->{helper}{INPUTNAMES}->{$inputNr}{aliasName} = $data; }; $inputindex = "PIONEERAVR_InputEnabled_".$inputNr; my ($err, $data) = getKeyValue($inputindex); - if (!defined $err) { + if ((!defined $err) && ($data ne '')) { $hash->{helper}{INPUTNAMES}->{$inputNr}{enabled} = $data; }; undef $err; @@ -2318,7 +2318,7 @@ sub PIONEERAVR_Read($) # 14char -> name of the input } elsif ( $line=~ m/^RGB(\d\d)(\d)(.*)/ ) { my $inputNr = $1; - my $isAlias = $2; #1: aliasName; 0: Standard (predefined) name + my $isAlias = $2; #1: sy; 0: Standard (predefined) name Log3 $hash, 5, "PIONEERAVR $name: ".dq( $line ) ." interpreted as: Name for InputNr: $inputNr is ".dq( $3 ); # remove non alnum $line =~ s/[^a-zA-Z 0-9]/ /g;