From fa6ee6cddc8cdadbeccdd015ffab3666d72d7eea Mon Sep 17 00:00:00 2001 From: ntruchsess Date: Tue, 2 Apr 2013 09:21:16 +0000 Subject: [PATCH] event-min-interval default to 5 seconds git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@3019 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/20_FRM_AD.pm | 10 +++++++--- fhem/FHEM/20_FRM_I2C.pm | 3 +++ 2 files changed, 10 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/20_FRM_AD.pm b/fhem/FHEM/20_FRM_AD.pm index 23ae9403b..fe858418c 100755 --- a/fhem/FHEM/20_FRM_AD.pm +++ b/fhem/FHEM/20_FRM_AD.pm @@ -35,10 +35,14 @@ FRM_AD_Init($$) my $ret = FRM_Init_Pin_Client($hash,$args,PIN_ANALOG); return $ret if (defined $ret); my $firmata = $hash->{IODev}->{FirmataDevice}; + my $name = $hash->{NAME}; $firmata->observe_analog($hash->{PIN},\&FRM_AD_observer,$hash); - $main::defs{$hash->{NAME}}{resolution}=$firmata->{metadata}{analog_resolutions}{$hash->{PIN}} if (defined $firmata->{metadata}{analog_resolutions}); - if (! (defined AttrVal($hash->{NAME},"stateFormat",undef))) { - $main::attr{$hash->{NAME}}{"stateFormat"} = "reading"; + $main::defs{$name}{resolution}=$firmata->{metadata}{analog_resolutions}{$hash->{PIN}} if (defined $firmata->{metadata}{analog_resolutions}); + if (! (defined AttrVal($name,"stateFormat",undef))) { + $main::attr{$name}{"stateFormat"} = "reading"; + } + if (! (defined AttrVal($name,"event-min-interval",undef))) { + $main::attr{$name}{"event-min-interval"} = 5; } main::readingsSingleUpdate($hash,"state","Initialized",1); return undef; diff --git a/fhem/FHEM/20_FRM_I2C.pm b/fhem/FHEM/20_FRM_I2C.pm index fcc9c26c7..52854bca1 100755 --- a/fhem/FHEM/20_FRM_I2C.pm +++ b/fhem/FHEM/20_FRM_I2C.pm @@ -39,6 +39,9 @@ FRM_I2C_Init($) $hash->{IODev}->{FirmataDevice}->i2c_read(@$args[0],@$args[1],@$args[2]); }; return "error calling i2c_read: ".$@ if ($@); + if (! (defined AttrVal($hash->{NAME},"event-min-interval",undef))) { + $main::attr{$hash->{NAME}}{"event-min-interval"} = 5; + } return undef; }