TT#9702 Conditionally load inew charging module

Change-Id: I31ae71bbb280364f470a22ee09b5ee9dfa1277a6
changes/18/11518/3
Andreas Granig 9 years ago
parent 2eff3bf540
commit 8ca2536da3

@ -5,6 +5,7 @@ use LWP::UserAgent;
use URI;
use POSIX;
use UUID;
use Module::Load::Conditional qw/can_load/;
use NGCP::Panel::Utils::Utf8;
@ -197,7 +198,11 @@ sub perform_prepaid_billing {
# currently only inew rating supported, let others pass
return 1 unless($is_prepaid && $prepaid_lib eq "libinewrate");
use NGCP::Rating::Inew::SmsSession;
my $use_list = { 'NGCP::Rating::Inew::SmsSession' => undef };
unless(can_load(modules => $use_list, nocache => 0, autoload => 0)) {
$c->log->error("Failed to load NGCP::Rating::Inew::SmsSession for sms from $caller to $callee");
return;
}
my $amqr = NGCP::Rating::Inew::SmsSession::init(
$c->config->{libinewrate}->{soap_uri},
$c->config->{libinewrate}->{openwire_uri},

Loading…
Cancel
Save