summaryrefslogtreecommitdiff
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 'lib/presque.pm')
-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} );