From 4410f055dde7e77492e6a1beeaf00d20ec6b6986 Mon Sep 17 00:00:00 2001
From: franck cuny <franck@lumberjaph.net>
Date: Wed, 14 Apr 2010 18:12:26 +0200
Subject: cleanup

---
 lib/presque.pm                | 7 +++++--
 lib/presque/ControlHandler.pm | 4 +++-
 2 files changed, 8 insertions(+), 3 deletions(-)

(limited to 'lib')

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>
-- 
cgit v1.2.3