From 290e5c6401d354777b7917e6eff72cfc8b2e6bbb Mon Sep 17 00:00:00 2001 From: "Kevin L. Kane" Date: Tue, 4 Aug 2015 08:52:40 -0400 Subject: [PATCH] removing Crypt::SSLeay dependency --- META.yml | 2 +- Makefile.PL | 2 +- lib/REST/Client.pm | 6 ------ 3 files changed, 2 insertions(+), 8 deletions(-) diff --git a/META.yml b/META.yml index bda6a65..3e281a4 100644 --- a/META.yml +++ b/META.yml @@ -19,7 +19,7 @@ no_index: - inc - t requires: - Crypt::SSLeay: 0 + LWP::Protocol::https: 0 LWP::UserAgent: 0 URI: 0 perl: 5.8.0 diff --git a/Makefile.PL b/Makefile.PL index 182cc29..93447c2 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -5,7 +5,7 @@ all_from 'lib/REST/Client.pm'; requires 'URI' => 0; requires 'LWP::UserAgent' => 0; -requires 'Crypt::SSLeay' => 0; +requires 'LWP::Protocol::https' => '0'; test_requires 'Test::More' => '0.8'; WriteAll(); diff --git a/lib/REST/Client.pm b/lib/REST/Client.pm index 963e652..033bc9e 100644 --- a/lib/REST/Client.pm +++ b/lib/REST/Client.pm @@ -79,7 +79,6 @@ our ($VERSION) = ('$Rev: 272 $' =~ /(\d+)/); use URI; use LWP::UserAgent; use Carp qw(croak carp); -use Crypt::SSLeay; =head2 Construction and setup @@ -329,10 +328,6 @@ sub request { $url = $self->_prepareURL($url); - #to ensure we use our desired SSL lib - my $tmp_socket_ssl_version = $IO::Socket::SSL::VERSION; - $IO::Socket::SSL::VERSION = undef; - my $ua = $self->getUseragent(); if(defined $self->getTimeout()){ $ua->timeout($self->getTimeout); @@ -386,7 +381,6 @@ sub request { } my $res = $self->getFollow ? $ua->request($req) : $ua->simple_request($req); - $IO::Socket::SSL::VERSION = $tmp_socket_ssl_version; $self->{_res} = $res;