diff options
author | Ivan Kohler <ivan@freeside.biz> | 2017-02-06 10:22:59 -0800 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2017-02-06 10:22:59 -0800 |
commit | 08ec199c66436f308f5ef090699d3b10ce932056 (patch) | |
tree | 0889459d5f8ad0b06cba20a1900cba4fa23ed5f1 /FS | |
parent | d8648be92fa4c30d9ca4377dc0ac8816438e1370 (diff) |
netsapiens integration: deb dep on REST::Client rather than throw a runtime error, RT#74517
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/part_export/netsapiens.pm | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/FS/FS/part_export/netsapiens.pm b/FS/FS/part_export/netsapiens.pm index c72093d00..ac78dbca5 100644 --- a/FS/FS/part_export/netsapiens.pm +++ b/FS/FS/part_export/netsapiens.pm @@ -1,13 +1,13 @@ package FS::part_export::netsapiens; +use base qw( FS::part_export ); -use vars qw(@ISA $me %info); +use vars qw( $me %info ); use MIME::Base64; use Tie::IxHash; -use FS::part_export; use Date::Format qw( time2str ); -use Regexp::Common qw/URI/; +use Regexp::Common qw( URI ); +use REST::Client; -@ISA = qw(FS::part_export); $me = '[FS::part_export::netsapiens]'; #These export options set default values for the various commands @@ -77,9 +77,6 @@ tie my %options, 'Tie::IxHash', 'options' => \%options, 'no_machine' => 1, 'notes' => <<'END' -Requires installation of -<a href="http://search.cpan.org/dist/REST-Client">REST::Client</a> -from CPAN. END ); @@ -118,8 +115,6 @@ sub _ns_command { # kludge to curb excessive paranoia in LWP 6.0+ local $ENV{'PERL_LWP_SSL_VERIFY_HOSTNAME'} = 0; - eval 'use REST::Client'; - die $@ if $@; my $ns = new REST::Client 'host'=>$self->option($prefix.'url'); |