From 920293158ad908105cf20f047794a30ca39a64f3 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Sat, 25 Jan 2014 16:53:20 -0800 Subject: initial version appears to be hooked up and working against dev sandbox --- t/lib/test_account.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 't/lib') 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) = ; 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); } -- cgit v1.2.1