X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FCommon.pm;h=171f47d538ebead85ed6dc0e43f8b1e49f9a1fcc;hp=d72e0cb967892c6921b80944f64d5d962afc9423;hb=5526f8d9bbc00db6accf155fd74550a61d4f2033;hpb=319149892408da93fef9496bb67e1f51cf64af76;ds=sidebyside diff --git a/perl/Sesse/pr0n/Common.pm b/perl/Sesse/pr0n/Common.pm index d72e0cb..171f47d 100644 --- a/perl/Sesse/pr0n/Common.pm +++ b/perl/Sesse/pr0n/Common.pm @@ -1007,7 +1007,7 @@ sub set_last_modified { my ($res, $mtime) = @_; my $str = POSIX::strftime("%a, %d %b %Y %H:%M:%S GMT", gmtime($mtime)); - $res->headers({ 'Last-Modified' => $str }); + $res->header('Last-Modified' => $str); } sub get_server_name {