diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CPAN/HTTP/Client.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/CPAN/HTTP/Client.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/tlperl/lib/CPAN/HTTP/Client.pm b/Master/tlpkg/tlperl/lib/CPAN/HTTP/Client.pm index c5eb0f6a435..4fc792c26a4 100644 --- a/Master/tlpkg/tlperl/lib/CPAN/HTTP/Client.pm +++ b/Master/tlpkg/tlperl/lib/CPAN/HTTP/Client.pm @@ -6,7 +6,7 @@ use vars qw(@ISA); use CPAN::HTTP::Credentials; use HTTP::Tiny 0.005; -$CPAN::HTTP::Client::VERSION = $CPAN::HTTP::Client::VERSION = "1.9600"; +$CPAN::HTTP::Client::VERSION = $CPAN::HTTP::Client::VERSION = "1.9601"; # CPAN::HTTP::Client is adapted from parts of cpanm by Tatsuhiko Miyagawa # and parts of LWP by Gisle Aas @@ -78,7 +78,7 @@ sub _auth_headers { # Get user credentials for mode my $cred_method = "get_" . ($mode ? "proxy" : "non_proxy") ."_credentials"; - my ($user, $pass) = return CPAN::HTTP::Credentials->$cred_method; + my ($user, $pass) = CPAN::HTTP::Credentials->$cred_method; # Generate the header for the mode & type my $header = $mode eq 'proxy' ? 'Proxy-Authorization' : 'Authorization'; |