From ce1fbbee84a5473a91d2fb4661735c5eac7b8bac Mon Sep 17 00:00:00 2001
From: Tom Clegg <tom@clinicalfuture.com>
Date: Tue, 4 Jun 2013 12:42:48 -0400
Subject: [PATCH] run job tasks in qsequence order in first pass

---
 services/crunch/crunch-job | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/services/crunch/crunch-job b/services/crunch/crunch-job
index c8c5908ef8..29ee98d355 100755
--- a/services/crunch/crunch-job
+++ b/services/crunch/crunch-job
@@ -791,9 +791,12 @@ sub reapchildren
   delete $proc{$pid};
 
   # Load new tasks
-  my $newtask_list = $arv->{'job_tasks'}->{'list'}->execute('where' => {
-    'created_by_job_task' => $Jobstep->{arvados_task}->{uuid}
-                                                             });
+  my $newtask_list = $arv->{'job_tasks'}->{'list'}->execute(
+    'where' => {
+      'created_by_job_task' => $Jobstep->{arvados_task}->{uuid}
+    },
+    'order' => 'qsequence'
+  );
   foreach my $arvados_task (@{$newtask_list->{'items'}}) {
     my $jobstep = {
       'level' => $arvados_task->{'sequence'},
-- 
2.30.2