projects
/
Net-VoIP_Innovations.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
initial version appears to be hooked up and working against dev sandbox
[Net-VoIP_Innovations.git]
/
t
/
61-getDID.t
diff --git
a/t/61-getDID.t
b/t/61-getDID.t
index
15dfe54
..
cd1b8d9
100644
(file)
--- a/
t/61-getDID.t
+++ b/
t/61-getDID.t
@@
-22,7
+22,8
@@
my $gp = Net::VoIP_Innovations->new( 'login' => $login,
my $return = $gp->getDID();
use Data::Dumper;
my $return = $gp->getDID();
use Data::Dumper;
-diag( Dumper($return) ) if $debug;
-#XXX test some things about the return...
-ok( $return, 'getDID returned something' );
+#test some things about the return...
+ok( $return->{type} ne 'Error', 'getDID returned no error' );
+diag( Dumper($return) ) if $return->{type} eq 'Error';
+