diff options
| author | Jeremy Davis <jeremyd@freeside.biz> | 2016-01-11 07:55:48 -0500 |
|---|---|---|
| committer | Jeremy Davis <jeremyd@freeside.biz> | 2016-01-11 07:55:48 -0500 |
| commit | cd73f00695cd1d118133669f09585c1b3d4322f6 (patch) | |
| tree | e27945974905734ad3c204c3e86a54952496c984 | |
| parent | 571291dda91dd92db80660aa3d67333b0c88fc34 (diff) | |
Ticket #38938 Deal with invalid SSL certs on CDR import
| -rw-r--r-- | FS/FS/part_export/pbxware.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/FS/FS/part_export/pbxware.pm b/FS/FS/part_export/pbxware.pm index cb75c9b5d..467b79f46 100644 --- a/FS/FS/part_export/pbxware.pm +++ b/FS/FS/part_export/pbxware.pm @@ -168,6 +168,10 @@ sub api_request { my $self = shift; my ($method, $content) = @_; $DEBUG ||= 1 if $self->option('debug'); + +# kludge to curb excessive paranoia in LWP 6.0+ +local $ENV{'PERL_LWP_SSL_VERIFY_HOSTNAME'} = 0; + my $url = 'https://' . $self->machine; my $request = POST($url, [ %$content, |