From cda9905b36efab4cb3f4a325f86747d5dc0cbb51 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 27 Jun 2008 07:18:59 +0000
Subject: globalpops_voip export compilation fixes

---
 FS/FS/part_export/globalpops_voip.pm | 6 +++---
 1 file 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,
-- 
cgit v1.2.1