From d27e215a0be0a8c1fb9d80dec02b0f4fffd90dc4 Mon Sep 17 00:00:00 2001 From: fladdy <> Date: Sat, 15 Dec 2012 18:26:22 +0000 Subject: [PATCH] Added DS1820 git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@2332 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- contrib/58_GPIO4.pm | 17 ++++++++++------- 1 file changed, 10 insertions(+), 7 deletions(-) diff --git a/contrib/58_GPIO4.pm b/contrib/58_GPIO4.pm index 3b498e080..e28839ddc 100644 --- a/contrib/58_GPIO4.pm +++ b/contrib/58_GPIO4.pm @@ -46,7 +46,7 @@ sub GPIO4_Define($$) { } else { my ($family, $id) = split('-',$a[2]); - if ($family eq "28") { + if ($family eq "28" || $family eq "10") { InternalTimer(gettimeofday()+10, "GPIO4_DeviceUpdateLoop", $hash, 0); } else { @@ -74,15 +74,18 @@ sub GPIO_GetSlave($) { my ($slave) = @_; Log 2, "GPIO4: GPIO4_GetSlave($slave)"; my ($family, $id) = split("-", $slave); + foreach my $devicename (keys %defs) { + return undef if ($defs{$devicename}{DEF} eq $slave); + } + Log 2, "GPIO4: create $slave"; + CommandDefine(undef,"gpio4_$id GPIO4 $slave"); if ($family eq "28") { - foreach my $devicename (keys %defs) { - return undef if ($defs{$devicename}{DEF} eq $slave); - } - Log 2, "GPIO4: create $slave"; - CommandDefine(undef,"gpio4_$id GPIO4 $slave"); - $attr{"gpio4_$id"}{room} = "GPIO4"; $attr{"gpio4_$id"}{model} = "DS18B20"; } + if ($family eq "10") { + $attr{"gpio4_$id"}{model} = "DS1820"; + } + $attr{"gpio4_$id"}{room} = "GPIO4"; return undef; }