X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FCommon.pm;h=ebcf408a866db140b1db75540b1f36932d6cc7f5;hp=4a552c4c7f9b5b793fdd59ad37ee6f0a76d8c200;hb=1a510dfa9c7cf801e9189f3ed329ef29b3526d65;hpb=54772c93b534979ab28f88a42eca429edf15d483

diff --git a/perl/Sesse/pr0n/Common.pm b/perl/Sesse/pr0n/Common.pm
index 4a552c4..ebcf408 100644
--- a/perl/Sesse/pr0n/Common.pm
+++ b/perl/Sesse/pr0n/Common.pm
@@ -319,17 +319,16 @@ 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");
 	if ($auth =~ /^Basic ([a-zA-Z0-9+\/]+=*)$/) {
 		return check_basic_auth($r, $1);
 	}	
 	if ($auth =~ /^Digest (.*)$/) {
 		return check_digest_auth($r, $1);
 	}
-	output_401($r, 0);
+	output_401($r);
 	return undef;
 }