From 7f6e4270c5cc17164570617fb6ac25ee7ee187bc Mon Sep 17 00:00:00 2001 From: justme1968 Date: Thu, 8 Aug 2013 17:27:17 +0000 Subject: [PATCH] regGet bug fix git-svn-id: https://svn.fhem.de/fhem/trunk@3623 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/34_SWAP.pm | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) diff --git a/fhem/FHEM/34_SWAP.pm b/fhem/FHEM/34_SWAP.pm index 491430063..32129ff83 100755 --- a/fhem/FHEM/34_SWAP.pm +++ b/fhem/FHEM/34_SWAP.pm @@ -429,13 +429,16 @@ SWAP_Set($@) my $reg = hex($1); return "register $arg is not known" if( $hash->{reg} && hex($hash->{reg}) != $reg ); - my $register = $hash->{product}->{registers}->{$reg}; - return "register $arg is not known" if( !defined($register) ); + if( $reg <= 0x0A ) { + } else { + my $register = $hash->{product}->{registers}->{$reg}; + return "register $arg is not known" if( !defined($register) ); - my $hwversion = $hash->{"SWAP_01-HardwareVersion"}; - return "register $arg is unused with HardwareVersion $hwversion" if( $hwversion && $register->{hwmask} && ($hwversion & $register->{hwmask}) != $register->{hwmask} ); - my $swversion = $hash->{"SWAP_02-FirmwareVersion"}; - return "register $arg is not available with FirmwareVersion $swversion" if( $swversion && $register->{swversion} && hex($swversion) < hex($register->{swversion}) ); + my $hwversion = $hash->{"SWAP_01-HardwareVersion"}; + return "register $arg is unused with HardwareVersion $hwversion" if( $hwversion && $register->{hwmask} && ($hwversion & $register->{hwmask}) != $register->{hwmask} ); + my $swversion = $hash->{"SWAP_02-FirmwareVersion"}; + return "register $arg is not available with FirmwareVersion $swversion" if( $swversion && $register->{swversion} && hex($swversion) < hex($register->{swversion}) ); + } } readingsSingleUpdate($hash, "state", "set-".$cmd, 1) if( $cmd ne "?" );