From f7fc366df59d74a34e58d750e3725cd0e0fb4963 Mon Sep 17 00:00:00 2001 From: Martin Mares Date: Thu, 16 Feb 2012 16:48:53 +0100 Subject: [PATCH] Still cleaning up references to `brun' and `bq' --- lib/bin/bex-run | 4 ++-- lib/perl/BEX/Config.pm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/lib/bin/bex-run b/lib/bin/bex-run index 97d46c0..5ace224 100755 --- a/lib/bin/bex-run +++ b/lib/bin/bex-run @@ -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; diff --git a/lib/perl/BEX/Config.pm b/lib/perl/BEX/Config.pm index e10820d..739b2eb 100644 --- a/lib/perl/BEX/Config.pm +++ b/lib/perl/BEX/Config.pm @@ -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; -- 2.39.2