fix sbatch array options

[uiuc_igb_scripts.git] / dqsub

diff --git a/dqsub b/dqsub
index e2b6e760fa626b31e99cd6a51fc003e5afa70ed9..ed8b62901173d534c64c7fc963095e7f2be65cc8 100755 (executable)
--- a/dqsub
+++ b/dqsub
@@ -193,7 +193,7 @@ if ($options{batch} eq 'pbs') {
 
 
 if ($options{interactive}) {
-    print STDERR 'running: qsub '.join(' ',@qsub_options) if $DEBUG;
+    print STDERR 'running: '.$JOB_SUBMITTER.' '.join(' ',@qsub_options) if $DEBUG;
     exec($JOB_SUBMITTER,@qsub_options);
 } else {
     my @array = ();
@@ -203,7 +203,12 @@ if ($options{interactive}) {
         if ($options{array_all_in_one_job}) {
             $options{array_per_job} = scalar @array;
         } else {
-            push @qsub_options,'-t','1-'. ceil(scalar @array / $options{array_per_job});
+            if ($options{batch} eq 'pbs') {
+                push @qsub_options,'-t';
+            } else {
+                push @qsub_options,'-a';
+            }
+            push @qsub_options,'1-'. ceil(scalar @array / $options{array_per_job});
             if ($options{array_slot_limit}) {
                 $qsub_options[$#qsub_options] .= '%'.$options{array_slot_limit};
             }