about summary refs log tree commit diff
path: root/lib/presque
diff options
context:
space:
mode:
Diffstat (limited to 'lib/presque')
-rw-r--r--lib/presque/RestQueueBatchHandler.pm1
-rw-r--r--lib/presque/RestQueueHandler.pm2
2 files changed, 3 insertions, 0 deletions
diff --git a/lib/presque/RestQueueBatchHandler.pm b/lib/presque/RestQueueBatchHandler.pm
index abdbe5e..311f223 100644
--- a/lib/presque/RestQueueBatchHandler.pm
+++ b/lib/presque/RestQueueBatchHandler.pm
@@ -62,6 +62,7 @@ sub _get_jobs_from_queue {
                     $value,
                     sub {
                         my $job = shift;
+                        $self->application->redis->del($value);
                         push @$keys, $value;
                         push @$jobs, $job;
                         if (++$pos > ($batch_size - 1)) {
diff --git a/lib/presque/RestQueueHandler.pm b/lib/presque/RestQueueHandler.pm
index 92542ba..0f919cd 100644
--- a/lib/presque/RestQueueHandler.pm
+++ b/lib/presque/RestQueueHandler.pm
@@ -62,6 +62,7 @@ sub _get_job_from_delay_queue {
         $k,
         sub {
             my $job = shift;
+            $self->application->redis->del($k);
             $self->_finish_get($queue_name, $job, $k);
         }
     );
@@ -81,6 +82,7 @@ sub _get_job_from_queue {
                     $value,
                     sub {
                         my $job = shift;
+                        $self->application->redis->del($value);
                         $self->_finish_get($queue_name, $job, $value);
                     }
                 );