diff options
author | ivan <ivan> | 2008-06-27 07:18:59 +0000 |
---|---|---|
committer | ivan <ivan> | 2008-06-27 07:18:59 +0000 |
commit | cda9905b36efab4cb3f4a325f86747d5dc0cbb51 (patch) | |
tree | 67a040d6e491fbfeaa84945c40a01673f490f234 | |
parent | c0fc4ff514307f032b16b827b6f4b2ae95ca18f9 (diff) |
globalpops_voip export compilation fixes
-rw-r--r-- | FS/FS/part_export/globalpops_voip.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/FS/FS/part_export/globalpops_voip.pm b/FS/FS/part_export/globalpops_voip.pm index c64e49a50..c641e0404 100644 --- a/FS/FS/part_export/globalpops_voip.pm +++ b/FS/FS/part_export/globalpops_voip.pm @@ -7,8 +7,8 @@ use FS::part_export; @ISA = qw(FS::part_export); tie my %options, 'Tie::IxHash', - 'login' => { label=>'GlobalPOPs Media Services API login', - 'password' => { label=>'GlobalPOPs Media Services API password', + 'login' => { label=>'GlobalPOPs Media Services API login' }, + 'password' => { label=>'GlobalPOPs Media Services API password' }, ; %info = ( @@ -69,7 +69,7 @@ sub globalpops_voip_command { my($login, $password, $method, @args) = @_; eval "use Net::GlobalPOPs::MediaServicesAPI;"; - die $@ if $@: + die $@ if $@; my $gp = new Net::GlobalPOPs 'login' => $login, |