X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FWebDAV.pm;h=aecd9fdae7aa5ca713f4e87083556605c035b516;hp=9d23bb9668af0860e186f0a25ce3a2d1cb7dd559;hb=b499b81784e502e480dd114bb1fc130f498ab224;hpb=0da154f826ede0ad490099494c36472822a90260 diff --git a/perl/Sesse/pr0n/WebDAV.pm b/perl/Sesse/pr0n/WebDAV.pm index 9d23bb9..aecd9fd 100644 --- a/perl/Sesse/pr0n/WebDAV.pm +++ b/perl/Sesse/pr0n/WebDAV.pm @@ -466,7 +466,7 @@ EOF $dbh->do('INSERT INTO images (id,event,uploadedby,takenby,filename) VALUES (?,?,?,?,?);', undef, $newid, $event, $user, $takenby, $filename); - $dbh->do('UPDATE events SET last_update=CURRENT_TIMESTAMP WHERE event=?', + $dbh->do('UPDATE events SET last_update=CURRENT_TIMESTAMP WHERE id=?', undef, $event); # Now save the file to disk @@ -500,7 +500,7 @@ EOF if ($@) { # Some error occurred, rollback and bomb out $dbh->rollback; - dberror($r, "Transaction aborted because $@"); + error($r, "Transaction aborted because $@"); unlink($fname); } }