Changeset 15358

Timestamp:

07/07/08 14:12:02 (5 years ago)

Author:

daisuke

Message:

include retry wait queue

Files:

• lang/perl/Mvalve/trunk/lib/Mvalve/QueueSet.pm (modified) (1 diff)

lang/perl/Mvalve/trunk/lib/Mvalve/QueueSet.pm

@@ -81 +81 @@
 }
 
-sub all_tables { map { $_->{table} } shift->all_queues }
+sub all_tables { map { $_->{table} } ($_[0]->all_queues, $_[0]->retry_wait_queues) }
 
 sub choose_table {