Commit baae0757 authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Ug, embarassing. Be sure to chdir to tbdata directory first. No wonder

all those top and ptop files are collecting in /usr/testbed/www!
parent bed22439
......@@ -32,6 +32,7 @@ use libdb;
use libtestbed;
my $tbdir = "$TB/bin/";
my $tbdata = "tbdata";
my $batch = 0;
my $inout;
my $logname;
......@@ -143,6 +144,11 @@ my $expt_path = $hashrow{'path'};
my $isbatchexpt = $hashrow{'batchmode'};
my $ebatchstate = $hashrow{'batchstate'};
if (! chdir("$expt_path/$tbdata")) {
die("*** $0:\n".
" Could not chdir to $expt_path/$tbdata: $!\n");
}
if (defined($hashrow{'expt_locked'})) {
$val = $hashrow{'expt_locked'};
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment