diff options
author | Ivan Kohler <ivan@freeside.biz> | 2014-01-25 16:53:20 -0800 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2014-01-25 16:53:20 -0800 |
commit | 920293158ad908105cf20f047794a30ca39a64f3 (patch) | |
tree | 2b23e5f81a384c43b6872dc64b20cebccfe5b15a /t/lib | |
parent | 1d339ad33855e8df8c1f466b494acbfd0e0907da (diff) |
initial version appears to be hooked up and working against dev sandbox
Diffstat (limited to 't/lib')
-rw-r--r-- | t/lib/test_account.pl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/t/lib/test_account.pl b/t/lib/test_account.pl index c52067d..b4ce640 100644 --- a/t/lib/test_account.pl +++ b/t/lib/test_account.pl @@ -15,13 +15,13 @@ sub test_account { my($login, $password, $hostport) = <TEST_ACCOUNT>; chomp $login; chomp $password; - chomp $hostport; + #chomp $hostport; - if ( $hostport =~ /^\s*([\w\.]+)(:(\d+))?\s*$/ ) { - my($host, $port) = ($1, $3); - $Net::VoIP_Innovations::HOST = $host; - $Net::VoIP_Innovations::PORT = $port; - } + #if ( $hostport =~ /^\s*([\w\.]+)(:(\d+))?\s*$/ ) { + # my($host, $port) = ($1, $3); + # $Net::VoIP_Innovations::HOST = $host; + # $Net::VoIP_Innovations::PORT = $port; + #} return($login, $password); } |