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

Fix up usage() statement. Add wanassign.log to list of files to throw

at the user when things go south.
parent a6a1b1e9
......@@ -15,12 +15,12 @@ use Getopt::Std;
# save off the file in the expinfo directory. The caller (batch daemon)
# opens the file and just passes the name in. I do not like this!
# usage: startexp [-b logfile] [-g gid] <pid> <eid> <nsfile>
# usage: startexp [-l] [-b logfile] [-g gid] <pid> <eid> <nsfile>
sub usage()
print STDOUT
"Usage: startexp [-b logfile] [-g gid] <pid> <eid> <nsfile>\n";
"Usage: startexp [-l] [-b logfile] [-g gid] <pid> <eid> <nsfile>\n";
my $optlist = "b:g:";
......@@ -295,7 +295,7 @@ my $infodir = "$pid-$eid-" . TBDateTimeFSSafe();
if (mkdir("$TBINFO/$infodir", 0770)) {
system("cp $nsfile $TBINFO/$infodir");
system("cp *.ptop *.top $TBINFO/$infodir");
system("cp assign.log $TBINFO/$infodir");
system("cp assign.log wanassign.log $TBINFO/$infodir");
system("cp $logname $TBINFO/$infodir/$eid.log");
......@@ -374,7 +374,7 @@ sub fatal()
"$user_name <$user_email>",
"Cc: $TBOPS",
($logname, "assign.log", $nsfile));
($logname, "assign.log", "wanassign.log", $nsfile));
# We have to cleanup the DB since we are disconnected from the
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