X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FRotate.pm;h=886f7bc54229bcb1362668bd24f95232f80f2434;hp=d5086ecc7b8715053067b1110b3053fba3f3d3ce;hb=53c79213cb078770e1e1d8795ce033d96c39e02d;hpb=fb1421cd30d9e888d738012b826761cc418082da

diff --git a/perl/Sesse/pr0n/Rotate.pm b/perl/Sesse/pr0n/Rotate.pm
index d5086ec..886f7bc 100644
--- a/perl/Sesse/pr0n/Rotate.pm
+++ b/perl/Sesse/pr0n/Rotate.pm
@@ -15,11 +15,11 @@ sub handler {
 
 	my @to_purge = ();
 
-	Sesse::pr0n::Common::header($r, "Rotation/deletion results");
-
 	my $res = Plack::Response->new(200);
 	my $io = IO::String->new;
 
+	Sesse::pr0n::Common::header($r, $io, "Rotation/deletion results");
+
 	{
 		# Enable transactions and error raising temporarily
 		local $dbh->{RaiseError} = 1;