]> mj.ucw.cz Git - bex.git/commitdiff
Still cleaning up references to `brun' and `bq'
authorMartin Mares <mj@ucw.cz>
Thu, 16 Feb 2012 15:48:53 +0000 (16:48 +0100)
committerMartin Mares <mj@ucw.cz>
Thu, 16 Feb 2012 15:48:53 +0000 (16:48 +0100)
lib/bin/bex-run
lib/perl/BEX/Config.pm

index 97d46c08de2e8c36d2f22ac2efa15b0d0c22bc02..5ace2240e3a5f7ef8745f739d917f9192571dbdb 100755 (executable)
@@ -158,12 +158,12 @@ sub run_job($$$) {
 my @machines = BEX::Config::parse_machine_list(@ARGV ? @ARGV : '*');
 my $queue = BEX::Queue->new($queue_name);
 
-$queue->lock(undef, undef) or die "The queue is locked by another brun, cannot continue.\n";
+$queue->lock(undef, undef) or die "The queue is locked by another bex run, cannot continue.\n";
 
 for my $mach (@machines) {
        my @q = $queue->scan($mach) or next;
        if (!$queue->lock($mach, undef)) {
-               print "### Machine $mach is locked by another brun, skipping...\n";
+               print "### Machine $mach is locked by another bex run, skipping...\n";
                update_status($mach, '-', 'LOCKED', undef);
                update_status($mach, '-', 'DONE', undef);
                next;
index e10820da1c685e4d8b4def0352c102a59baff468..739b2ebbd5431639afa66c9be1f2e97b0704dfb8 100644 (file)
@@ -45,11 +45,11 @@ our $ping_hosts = 1;
 #      queue - obtain exclusive access to the whole queue
 our $locking_scheme = 'host';
 
-# Maximum number of simultaneously running jobs in `bprun'
+# Maximum number of simultaneously running jobs in `bex prun'
 our $max_parallel_jobs = 5;
 
 # When a job fails, skip all other jobs on the same host
-# (however, when locking_scheme is set to `job', another instance of `brun'
+# (however, when locking_scheme is set to `job', another instance of `bex run'
 # still could run such jobs in parallel)
 our $skip_on_fail = 0;