about summary refs log tree commit diff
path: root/lib/presque.pm
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2010-04-14 13:48:40 +0200
committerfranck cuny <franck@lumberjaph.net>2010-04-14 13:48:40 +0200
commit596e73e4d4d65853fcbe9b33d2303f9029d6b338 (patch)
treeaffba7aa03f28b9d2cf54f75cf4e7203a8d36c95 /lib/presque.pm
parentfix error (diff)
downloadpresque-596e73e4d4d65853fcbe9b33d2303f9029d6b338.tar.gz
add control handler
Diffstat (limited to '')
-rw-r--r--lib/presque.pm10
1 files changed, 6 insertions, 4 deletions
diff --git a/lib/presque.pm b/lib/presque.pm
index a1b7cbd..370ea3a 100644
--- a/lib/presque.pm
+++ b/lib/presque.pm
@@ -10,6 +10,7 @@ use presque::RestQueueHandler;
 use presque::JobQueueHandler;
 use presque::IndexHandler;
 use presque::StatusHandler;
+use presque::ControlHandler;
 
 has config => (
     is      => 'rw',
@@ -36,10 +37,11 @@ sub app {
     my ( $class, %args ) = @_;
     my $self = $class->new(
         [
-            '/q/(.*)'     => 'presque::RestQueueHandler',
-            '/j/(.*)'     => 'presque::JobQueueHandler',
-            '/stats/(.*)' => 'presque::StatusHandler',
-            '/'           => 'presque::IndexHandler',
+            '/q/(.*)'       => 'presque::RestQueueHandler',
+            '/j/(.*)'       => 'presque::JobQueueHandler',
+            '/stats/(.*)'   => 'presque::StatusHandler',
+            '/control/(.*)' => 'presque::ControlHandler',
+            '/'             => 'presque::IndexHandler',
         ]
     );
     $self->config( delete $args{config} );