diff options
author | franck cuny <franck@lumberjaph.net> | 2009-12-21 22:01:43 +0100 |
---|---|---|
committer | franck cuny <franck@lumberjaph.net> | 2009-12-21 22:01:43 +0100 |
commit | 7a98ef5fbfebdcc1d734274112e6edf55ff20846 (patch) | |
tree | a582ed6af9b3f0bb314470f83046083f4c31ae8b /lib/Lifestream | |
parent | small update (diff) | |
download | lifestream-7a98ef5fbfebdcc1d734274112e6edf55ff20846.tar.gz |
fix timer
Diffstat (limited to 'lib/Lifestream')
-rw-r--r-- | lib/Lifestream/Worker.pm | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lib/Lifestream/Worker.pm b/lib/Lifestream/Worker.pm index c22abcb..5718ad4 100644 --- a/lib/Lifestream/Worker.pm +++ b/lib/Lifestream/Worker.pm @@ -9,11 +9,7 @@ use Tatsumaki::HTTPClient; use Try::Tiny; use XML::Feed; -has config => ( - is => "rw", - isa => "HashRef" -); - +has config => ( is => "rw", isa => "HashRef" ); has schema => ( is => 'ro', isa => 'Lifestream::Schema', @@ -28,10 +24,10 @@ has schema => ( sub start { my $self = shift; my $t; - $t = AE::timer 0, 15, sub { + $t = AE::timer 0, 60, sub { + scalar $t; $self->fetch_feeds; }; - #$self->fetch_feeds(); } sub fetch_feeds { |