accept trailing slashes on http-proxy
authorDaniel Kahn Gillmor <dkg@fifthhorseman.net>
Mon, 20 Dec 2010 09:13:30 +0000 (04:13 -0500)
committerDaniel Kahn Gillmor <dkg@fifthhorseman.net>
Mon, 20 Dec 2010 09:13:30 +0000 (04:13 -0500)
gpgkeys_hkpms

index 9d50554b97079bf2ff1af0848fb47fb4ab3d536a..03a79f28c8f41eb520c22d85021dfe3aa7e5b409 100755 (executable)
@@ -49,7 +49,7 @@ use warnings;
               $self->{actually_check} = 1;
             } elsif ($opt =~ /^http-proxy=(.*)/) {
               my $hp = $1;
-              if ($hp =~ /^(socks|http|https):\/\/($RE{net}{domain}|$RE{net}{IPv4}):([[:digit:]]+)$/) {
+              if ($hp =~ /^(socks|http|https):\/\/($RE{net}{domain}|$RE{net}{IPv4}):([[:digit:]]+)\/?$/) {
                 if ('socks' eq $1) {
                   if ( ! Module::Load::Conditional::check_install(module => 'LWP::Protocol::socks')) {
                     $self->{logger}->log('error', "Requesting a socks proxy for hkpms, but LWP::Protocol::socks is not installed.\nThis will likely fail.\n");