summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2010-07-06 10:49:03 +0200
committerfranck cuny <franck@lumberjaph.net>2010-07-06 10:49:03 +0200
commitc3fa7ddfb6fb0dd128963b57c0af73ebf71484d5 (patch)
tree98d97a1e4e0927c10a235d45ef758c9397be244e
parentfix request for workers stats (diff)
downloadnet-presque-c3fa7ddfb6fb0dd128963b57c0af73ebf71484d5.tar.gz
fix hook to add worker_id
-rw-r--r--lib/Net/Presque.pm12
1 files changed, 7 insertions, 5 deletions
diff --git a/lib/Net/Presque.pm b/lib/Net/Presque.pm
index bc4c9c0..1a7c976 100644
--- a/lib/Net/Presque.pm
+++ b/lib/Net/Presque.pm
@@ -117,14 +117,16 @@ net_api_method unregister_worker => (
required => [qw/queue_name/],
);
-after 'new' => sub {
+sub BUILD {
my $self = shift;
if ($self->has_worker_id) {
- $self->useragent->add_handler('request_prepare' => sub {
- my ($request, ) = @_;
- $request->header('X-presque-workerid' => $self->worker_id);
- });
+ $self->api_useragent->add_handler(
+ 'request_prepare' => sub {
+ my ($request,) = @_;
+ $request->header('X-presque-workerid' => $self->worker_id);
+ }
+ );
}
};