Commit 2e4b033d authored by Leigh B Stoller's avatar Leigh B Stoller

Tweak to error handling when we cannot get the max extension for

an experiment from the cluster (say, cause its offline).
parent 6f79ee64
#!/usr/bin/perl -w
#
# Copyright (c) 2000-2017 University of Utah and the Flux Group.
# Copyright (c) 2000-2018 University of Utah and the Flux Group.
#
# {{{EMULAB-LICENSE
#
......@@ -2094,6 +2094,7 @@ sub DoMaxExtension()
}
exit(0);
bad:
print STDERR "$errmsg\n" if (defined($errmsg));
if (defined($webtask)) {
$webtask->output($errmsg) if (defined($errmsg));
$webtask->Exited($errcode);
......@@ -2125,7 +2126,7 @@ sub DoMaxExtensionInternal($$$)
}
my $errcode = CallAggregateMethod("MaxExtension", \$maxinfo, @aggregates);
if ($errcode) {
$errmsg = $maxinfo;
$$prval = $maxinfo;
goto bad;
}
# Process the max extension from each aggregate
......
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