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

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'};
......
Markdown is supported
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