X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=brun;h=040b6ba40d66d6abc9f83bd8b00401062a76e069;hb=b7a75186ed33df2a064f71efbc36cbf9b5903af7;hp=387347a9b0c5aed9f5b168764e9821271fe51dc7;hpb=dce104810522c8394ef547f3098945a58c2b2dd6;p=bex.git

diff --git a/brun b/brun
index 387347a..040b6ba 100755
--- a/brun
+++ b/brun
@@ -167,6 +167,7 @@ for my $mach (@machines) {
 			$jid eq $given_job or next;
 		}
 		my $job = BEX::Job->new_from_file($queue->job_file($jid));
+		update_status($mach, $jid, 'INIT', undef);
 		if (!$queue->lock($mach, $jid)) {
 			print "### Skipping locked $jid on $mach ###\n";
 			update_status($mach, $jid, 'LOCKED', undef);
@@ -187,6 +188,7 @@ for my $mach (@machines) {
 			}
 		}
 	}
+} continue {
 	update_status($mach, '-', 'DONE', undef);
 }
 $queue->unlock;