diff options
author | franck cuny <franck@lumberjaph.net> | 2010-11-26 14:25:34 +0100 |
---|---|---|
committer | franck cuny <franck@lumberjaph.net> | 2010-11-26 14:25:34 +0100 |
commit | c2ca850cccee4b9d41aff31ff2af6ef2c9f39087 (patch) | |
tree | 7f4a69bcf052fba1001ba7a97a41abf93ffe89a8 | |
parent | Merge branch 'master' of github.com:franckcuny/presque-worker (diff) | |
download | presque-worker-c2ca850cccee4b9d41aff31ff2af6ef2c9f39087.tar.gz |
add new middleware for clientid
-rw-r--r-- | lib/presque/worker/Middleware/ClientID.pm | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/lib/presque/worker/Middleware/ClientID.pm b/lib/presque/worker/Middleware/ClientID.pm new file mode 100644 index 0000000..c2a89a6 --- /dev/null +++ b/lib/presque/worker/Middleware/ClientID.pm @@ -0,0 +1,16 @@ +package presque::worker::Middleware::ClientID; + +use Moose; +extend 'Net::HTTP::Spore::Middleware'; + +has worker_id => ( is => 'rw', isa => 'Str', predicate => 'has_worker_id' ); + +sub call { + my ( $self, $req ) = @_; + + if ( $self->has_worker_id ) { + $req->header( 'X-presque-workerid' => $self->worker_id ); + } +} + +1; |