X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FCommon.pm;h=60e9469d57e7ece412f228cd49f7fc61b6df3f0b;hb=a87e90cdd5ed56bc6bfa460a9b56f587a65bebd3;hp=4a552c4c7f9b5b793fdd59ad37ee6f0a76d8c200;hpb=54772c93b534979ab28f88a42eca429edf15d483;p=pr0n diff --git a/perl/Sesse/pr0n/Common.pm b/perl/Sesse/pr0n/Common.pm index 4a552c4..60e9469 100644 --- a/perl/Sesse/pr0n/Common.pm +++ b/perl/Sesse/pr0n/Common.pm @@ -319,7 +319,7 @@ sub check_access { my $auth = $r->headers_in->{'authorization'}; if (!defined($auth)) { - output_401($r, 0); + output_401($r); return undef; } $r->log->warn("Auth: $auth"); @@ -329,7 +329,7 @@ sub check_access { if ($auth =~ /^Digest (.*)$/) { return check_digest_auth($r, $1); } - output_401($r, 0); + output_401($r); return undef; }