| 12
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 
 | # Closing bug #509457 triggered by libwww-perl 5.813 to 5.820
# transition (thanks to Niko Tyni for the patch)
Index: libapache2-mod-perl2/Apache-Test/lib/Apache/TestRequest.pm
===================================================================
--- libapache2-mod-perl2.orig/Apache-Test/lib/Apache/TestRequest.pm	2008-12-26 19:31:56.000000000 -0600
+++ libapache2-mod-perl2/Apache-Test/lib/Apache/TestRequest.pm	2008-12-26 19:32:27.000000000 -0600
@@ -256,6 +256,11 @@
     $self;
 }
 
+sub credentials {
+    my $self = shift;
+    return $self->get_basic_credentials(@_);
+}
+
 sub get_basic_credentials {
     my($self, $realm, $uri, $proxy) = @_;
 
 |