Commit 8fb9abb4 authored by Leigh Stoller's avatar Leigh Stoller

Minor bug fix to slice unlocking.

parent b7f901d2
#!/usr/bin/perl -w
#
# Copyright (c) 2008-2018 University of Utah and the Flux Group.
# Copyright (c) 2008-2019 University of Utah and the Flux Group.
#
# {{{GENIPUBLIC-LICENSE
#
......@@ -469,6 +469,7 @@ sub ExpireSlices()
}
if ($experiment->state() eq EXPTSTATE_PANICED()) {
print STDERR "Refusing to terminate a paniced experiment\n";
$slice->UnLock();
goto skip;
}
......
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