summary refs log tree commit diff
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);
+            }
+        );
     }
 };