* Use ->update({...}) properly.

This commit is contained in:
Eelco Dolstra
2009-03-09 16:22:41 +00:00
parent 717625a5b9
commit 8725dc03ec
5 changed files with 19 additions and 49 deletions

View File

@ -84,8 +84,7 @@ sub fetchInputAlt {
} else {
$timestamp = $cachedInput->timestamp;
$db->txn_do(sub {
$cachedInput->lastseen(time);
$cachedInput->update;
$cachedInput->update({lastseen => time});
});
}
}
@ -274,9 +273,7 @@ sub setJobsetError {
my ($jobset, $errorMsg) = @_;
eval {
$db->txn_do(sub {
$jobset->errormsg($errorMsg);
$jobset->errortime(time);
$jobset->update;
$jobset->update({errormsg => $errorMsg, errortime => time});
});
};
}
@ -316,8 +313,7 @@ sub checkJobSet {
my $inputInfo = {};
$db->txn_do(sub {
$jobset->lastcheckedtime(time);
$jobset->update;
$jobset->update({lastcheckedtime => time});
});
# Fetch all values for all inputs.