fix to deal properly with list of commands

NBISweden · Feb 27, 2020 · 6a27158 · 6a27158
1 parent cc1f852
commit 6a27158
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/annotation/NBIS/Grid/GridRunner.pm b/annotation/NBIS/Grid/GridRunner.pm
@@ -67,7 +67,7 @@ sub BUILD {
     # --------- write commands listing ------------
     open (my $fh, ">$log_dir/cmds_list.txt") or die $!;
     my $index = 0;
-    foreach my $cmd ($self->cmds_list) {
+    foreach my $cmd (@{$self->cmds_list}) {
         print $fh "index($index)\t$cmd\n";
         $index++;
     }