Permalink
Browse files

use SSL_VERIFY_PEER for security, requiring Furl 1.01

  • Loading branch information...
gfx committed Jan 4, 2013
1 parent 9f82f8a commit 5dd5fbff3fffc8980b8249e2f2fb2644e382c6c8
Showing with 6 additions and 2 deletions.
  1. +1 −1 Makefile.PL
  2. +5 −1 lib/WebService/Dropbox.pm
View
@@ -1,6 +1,6 @@
use ExtUtils::MakeMaker;
my %http_module = (Furl => '0.42');
my %http_module = (Furl => '1.01');
eval {
require Furl::HTTP;
};if ($@) {
@@ -37,6 +37,7 @@ $WebService::Dropbox::USE_LWP = 0;
sub import {
eval {
require Furl::HTTP;
require IO::Socket::SSL;
};if ($@) {
require LWP::UserAgent;
require HTTP::Request;
@@ -485,7 +486,10 @@ sub furl {
my $self = shift;
unless ($self->{furl}) {
$self->{furl} = Furl::HTTP->new(
timeout => $self->timeout
timeout => $self->timeout,
ssl_opts => {
SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_PEER(),
},
);
}
$self->{furl};

0 comments on commit 5dd5fbf

Please sign in to comment.