Only send email notification of evaluation error when the evaluation error has changed. Fixes #121.
This commit is contained in:
parent
550d6b79b1
commit
b1e29e50a7
|
@ -41,12 +41,16 @@ sub fetchInputs {
|
|||
|
||||
sub setJobsetError {
|
||||
my ($jobset, $errorMsg) = @_;
|
||||
my $prevError = $jobset->errormsg;
|
||||
|
||||
eval {
|
||||
txn_do($db, sub {
|
||||
$jobset->update({errormsg => $errorMsg, errortime => time});
|
||||
});
|
||||
};
|
||||
if ($errorMsg ne $prevError) {
|
||||
sendJobsetErrorNotification($jobset, $errorMsg);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
|
Loading…
Reference in a new issue