From 0da154f826ede0ad490099494c36472822a90260 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sesse@debian.org>
Date: Mon, 25 Dec 2006 21:35:18 +0100
Subject: [PATCH] Fix another typo, preventing uploads.

---
 perl/Sesse/pr0n/WebDAV.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/Sesse/pr0n/WebDAV.pm b/perl/Sesse/pr0n/WebDAV.pm
index 151370c..9d23bb9 100644
--- a/perl/Sesse/pr0n/WebDAV.pm
+++ b/perl/Sesse/pr0n/WebDAV.pm
@@ -580,7 +580,7 @@ EOF
 		$dbh->do('DELETE FROM images WHERE event=? AND filename=?;',
 			undef, $event, $filename)
 			or dberror($r, "Couldn't remove file");
-		$dbh->do('UPDATE events SET last_update=CURRENT_TIMESTAMP WHERE event=?',
+		$dbh->do('UPDATE events SET last_update=CURRENT_TIMESTAMP WHERE id=?',
 			undef, $event)
 			or dberror($r, "Couldn't invalidate cache");
 		$r->status(200);
-- 
2.39.2