X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-voipinnovations-cdrimport;h=5eb2aef95250661bfc82641c9bbb98b0add2f664;hb=11bbf29de447fe39e9d7155fe280a0df70fa8c3c;hp=e0ba7854b717ac694f813dd1bc67ec984b7468b8;hpb=352650e920955b22a2468c54633d9e4c5cfaff84;p=freeside.git

diff --git a/FS/bin/freeside-voipinnovations-cdrimport b/FS/bin/freeside-voipinnovations-cdrimport
index e0ba7854b..5eb2aef95 100755
--- a/FS/bin/freeside-voipinnovations-cdrimport
+++ b/FS/bin/freeside-voipinnovations-cdrimport
@@ -4,8 +4,8 @@ use strict;
 use Getopt::Std;
 use Date::Format;
 use File::Temp 'tempdir';
-use Net::SSLGlue::FTP; #at least until the Deb 9 transition is done, then
-                       # regular Net::FTP has SSL support
+use Net::FTP 2.80; #3.08; 2.79 in deb 8 doesn't work, 3.08 in deb 9 does
+use IO::Socket::SSL 2.007;
 use FS::UID qw(adminsuidsetup datasrc dbh);
 use FS::cdr;
 use FS::cdr_batch;
@@ -40,7 +40,7 @@ my $tempdir = tempdir( CLEANUP => !$opt_v );
 my $format = 'voip_innovations';
 my $hostname = 'customercdr.voipinnovations.com';
 
-my $ftp = Net::FTP->new($hostname, Debug => $opt_d)
+my $ftp = Net::FTP->new($hostname, Passive => 1, Debug => $opt_d)
   or die "Can't connect to $hostname: $@\n";
 
 $ftp->starttls()