X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FSelect.pm;h=21dca6a662611418a828abe2d4d06647e0de432d;hb=b9c62b0e96eb2b04cf0f4355174831606f982f18;hp=777e02b37cd3adc236f1ef7d161afc0eb0e2c4bb;hpb=0737361d60ab3c2be28045ac522ce19722d2ffaf;p=pr0n

diff --git a/perl/Sesse/pr0n/Select.pm b/perl/Sesse/pr0n/Select.pm
index 777e02b..21dca6a 100644
--- a/perl/Sesse/pr0n/Select.pm
+++ b/perl/Sesse/pr0n/Select.pm
@@ -44,6 +44,9 @@ sub handler {
 		}
 	}
 
+	$dbh->do('UPDATE events SET last_update=CURRENT_TIMESTAMP WHERE id=?', undef, $event)
+		or dberror($r, "Cache invalidation failed");
+
 	Sesse::pr0n::Common::footer($r);
 
 	return Apache2::Const::OK;