X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FRotate.pm;fp=perl%2FSesse%2Fpr0n%2FRotate.pm;h=9cf18d8ef69ed8f790ced723733a812366730838;hp=59103e70241fdd373b6486909af96adb7887e17b;hb=b9c62b0e96eb2b04cf0f4355174831606f982f18;hpb=7039a36da013481c21f65bd5a808b61ea9e5656a diff --git a/perl/Sesse/pr0n/Rotate.pm b/perl/Sesse/pr0n/Rotate.pm index 59103e7..9cf18d8 100644 --- a/perl/Sesse/pr0n/Rotate.pm +++ b/perl/Sesse/pr0n/Rotate.pm @@ -63,6 +63,10 @@ sub handler { } } } + + my $event = $apr->param('event'); + $dbh->do('UPDATE events SET last_update=CURRENT_TIMESTAMP WHERE id=?', undef, $event) + or dberror($r, "Cache invalidation failed"); Sesse::pr0n::Common::footer($r);