summaryrefslogtreecommitdiff
path: root/lib/presque/StatusHandler.pm
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2010-05-09 14:53:45 +0200
committerfranck cuny <franck@lumberjaph.net>2010-05-09 14:53:45 +0200
commit2582e39d9116afba352de8e5851f1ae5f820bc96 (patch)
tree60c867033f72d4e48996a50eb790dd02c7afb317 /lib/presque/StatusHandler.pm
parentnew role to handle error and set content type (diff)
downloadpresque-2582e39d9116afba352de8e5851f1ae5f820bc96.tar.gz
use roles
Diffstat (limited to '')
-rw-r--r--lib/presque/StatusHandler.pm8
1 files changed, 2 insertions, 6 deletions
diff --git a/lib/presque/StatusHandler.pm b/lib/presque/StatusHandler.pm
index 84a75de..6e846d2 100644
--- a/lib/presque/StatusHandler.pm
+++ b/lib/presque/StatusHandler.pm
@@ -2,17 +2,13 @@ package presque::StatusHandler;
use Moose;
extends 'Tatsumaki::Handler';
-with qw/presque::Role::QueueName/;
+with
+ qw/presque::Role::QueueName presque::Role::Error presque::Role::Response/;
__PACKAGE__->asynchronous(1);
use JSON;
-before [qw/get/] => sub {
- my $self = shift;
- $self->response->header('application/json');
-};
-
sub get {
my ( $self, $queue_name ) = @_;