Commit 5f09e66f authored by Leigh B Stoller's avatar Leigh B Stoller

Need to LWP SSL on FreeBSD > 8 (was > 9).

parent b17e841b
......@@ -186,7 +186,7 @@ sub CallMethod($$$@)
return undef;
}
if ($FBSD_MAJOR >= 9) {
if ($FBSD_MAJOR >= 8) {
require LWP::UserAgent;
require IO::Socket::SSL;
require Net::HTTPS;
......@@ -255,7 +255,7 @@ sub CallMethod($$$@)
my $hreq = HTTP::Request->new(POST => $httpURL);
$hreq->content_type('text/xml');
$hreq->content($reqstr);
$hreq->protocol('HTTP/1.0') if ($FBSD_MAJOR >= 9);
$hreq->protocol('HTTP/1.0') if ($FBSD_MAJOR >= 8);
my $hresp = $ua->request($hreq);
# Do this or the next call gets messed up.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment