diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/Lifestream.pm | 6 | ||||
| -rw-r--r-- | lib/Lifestream/Worker.pm | 10 |
2 files changed, 4 insertions, 12 deletions
diff --git a/lib/Lifestream.pm b/lib/Lifestream.pm index c101ff1..cca6309 100644 --- a/lib/Lifestream.pm +++ b/lib/Lifestream.pm @@ -8,11 +8,7 @@ use Lifestream::Worker; our $VERSION = '0.01'; -has config => ( - is => "rw", - isa => "HashRef" -); - +has config => ( is => "rw", isa => "HashRef" ); has schema => ( is => 'ro', isa => 'Lifestream::Schema', 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 { |