From bcc7c23ef6210d613197613d0b2d5d76fae2c67a Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Sat, 31 Oct 2015 13:25:24 +0000 Subject: [PATCH] 59_HCS.pm: reformat Attribtues, fix desabled problem (Forum #43266) git-svn-id: https://svn.fhem.de/fhem/trunk@9735 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/59_HCS.pm | 29 ++++++++++++++++++++++------- 1 file changed, 22 insertions(+), 7 deletions(-) diff --git a/fhem/FHEM/59_HCS.pm b/fhem/FHEM/59_HCS.pm index 679eca08f..8e49a3160 100644 --- a/fhem/FHEM/59_HCS.pm +++ b/fhem/FHEM/59_HCS.pm @@ -74,13 +74,28 @@ HCS_Initialize($$) $hash->{GetFn} = "HCS_Get"; $hash->{SetFn} = "HCS_Set"; $hash->{NotifyFn} = "HCS_Notify"; - $hash->{AttrList} = "deviceCmdOn deviceCmdOff exclude ecoTemperatureOn ecoTemperatureOff ". - "interval idleperiod mode:thermostat,valve ". - "sensor sensorThresholdOn sensorThresholdOff sensorReading ". - "thermostatThresholdOn thermostatThresholdOff ". - "valveThresholdOn valveThresholdOff ". - "do_not_notify:1,0 " . $readingFnAttributes . - "disable:0,1"; + no warnings 'qw'; + my @attrList = qw( + deviceCmdOff + deviceCmdOn + disable:0,1 + ecoTemperatureOff + ecoTemperatureOn + exclude + idleperiod + interval + mode:thermostat,valve + sensor + sensorReading + sensorThresholdOff + sensorThresholdOn + thermostatThresholdOff + thermostatThresholdOn + valveThresholdOff + valveThresholdOn + ); + use warnings 'qw'; + $hash->{AttrList} = join(" ", @attrList) ." ". $readingFnAttributes; } #####################################