diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-04-14 18:12:26 +0200 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-04-14 18:12:26 +0200 |
| commit | 4410f055dde7e77492e6a1beeaf00d20ec6b6986 (patch) | |
| tree | ba75a16b8962909469fa7300ec7d24d86eb9d545 /lib | |
| parent | return a json object (diff) | |
| download | presque-4410f055dde7e77492e6a1beeaf00d20ec6b6986.tar.gz | |
cleanup
Diffstat (limited to '')
| -rw-r--r-- | lib/presque.pm | 7 | ||||
| -rw-r--r-- | lib/presque/ControlHandler.pm | 4 |
2 files changed, 8 insertions, 3 deletions
diff --git a/lib/presque.pm b/lib/presque.pm index 370ea3a..9d88ca7 100644 --- a/lib/presque.pm +++ b/lib/presque.pm @@ -25,11 +25,10 @@ has redis => ( lazy => 1, default => sub { my $self = shift; - my $r = AnyEvent::Redis->new( + AnyEvent::Redis->new( host => $self->config->{redis}->{host}, port => $self->config->{redis}->{port} ); - $r; } ); @@ -89,6 +88,10 @@ all the queues. return some basic information about a queue. +=item B<GET /control/queuename> + +=item B<POST /control/queuename> + =back =head2 INSERT A JOB diff --git a/lib/presque/ControlHandler.pm b/lib/presque/ControlHandler.pm index 94ceab0..f900ea9 100644 --- a/lib/presque/ControlHandler.pm +++ b/lib/presque/ControlHandler.pm @@ -11,7 +11,7 @@ before [qw/get post/] => sub { sub get { my ( $self, $queue_name ) = @_; - + if ( !$queue_name ) { $self->response->code(404); $self->finish("queue name is missing"); @@ -82,6 +82,8 @@ presque::ControlHandler - a redis based message queue =head1 DESCRIPTION +=head1 METHODS + =head1 AUTHOR franck cuny E<lt>franck@lumberjaph.netE<gt> |