FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-21 01:46:08 +00:00
Code Issues Releases Wiki Activity

event-min-interval default to 5 seconds

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@3019 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
ntruchsess 2013-04-02 09:21:16 +00:00
parent 4ba66d7dba
commit 539ff23a51
2 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
fhem/FHEM/20_FRM_AD.pm
View File

@ -35,10 +35,14 @@ FRM_AD_Init($$)
my $ret = FRM_Init_Pin_Client($hash,$args,PIN_ANALOG); my $ret = FRM_Init_Pin_Client($hash,$args,PIN_ANALOG);
return $ret if (defined $ret); return $ret if (defined $ret);
my $firmata = $hash->{IODev}->{FirmataDevice}; my $firmata = $hash->{IODev}->{FirmataDevice};
my $name = $hash->{NAME};
$firmata->observe_analog($hash->{PIN},\&FRM_AD_observer,$hash); $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}); $main::defs{$name}{resolution}=$firmata->{metadata}{analog_resolutions}{$hash->{PIN}} if (defined $firmata->{metadata}{analog_resolutions});
if (! (defined AttrVal($hash->{NAME},"stateFormat",undef))) { if (! (defined AttrVal($name,"stateFormat",undef))) {
$main::attr{$hash->{NAME}}{"stateFormat"} = "reading"; $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); main::readingsSingleUpdate($hash,"state","Initialized",1);
return undef; return undef;

3
fhem/FHEM/20_FRM_I2C.pm
View File

@ -39,6 +39,9 @@ FRM_I2C_Init($)
$hash->{IODev}->{FirmataDevice}->i2c_read(@$args[0],@$args[1],@$args[2]); $hash->{IODev}->{FirmataDevice}->i2c_read(@$args[0],@$args[1],@$args[2]);
}; };
return "error calling i2c_read: ".$@ if ($@); 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; return undef;
} }