diff options
author | ivan <ivan> | 2012-02-13 04:45:18 +0000 |
---|---|---|
committer | ivan <ivan> | 2012-02-13 04:45:18 +0000 |
commit | 3acaea77e979e4739ede4a93f09d6fbf50f78d7b (patch) | |
tree | 8eb2d6ef12e2ff592f250be335036ed392b82903 /FS/FS/part_export/globalpops_voip.pm | |
parent | f9924b31d40fddfeb1e0e176532440f551f50837 (diff) |
show a VoIP Innovations login error in the log, RT#15150
Diffstat (limited to 'FS/FS/part_export/globalpops_voip.pm')
-rw-r--r-- | FS/FS/part_export/globalpops_voip.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/FS/FS/part_export/globalpops_voip.pm b/FS/FS/part_export/globalpops_voip.pm index e256d6a..b6e713a 100644 --- a/FS/FS/part_export/globalpops_voip.pm +++ b/FS/FS/part_export/globalpops_voip.pm @@ -60,6 +60,10 @@ sub get_dids { } my $dids = $self->gp_command('getDIDs', %getdids); + if ( $dids->{'type'} eq 'Error' ) { + die "Error running VoIP Innovations getDIDs: ". + $search->{'statuscode'}. ': '. $search->{'status'}; #die?? + } #use Data::Dumper; #warn Dumper($dids); |