From 920293158ad908105cf20f047794a30ca39a64f3 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Sat, 25 Jan 2014 16:53:20 -0800
Subject: initial version appears to be hooked up and working against dev
 sandbox

---
 t/61-getDID.t | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 't/61-getDID.t')

diff --git a/t/61-getDID.t b/t/61-getDID.t
index 15dfe54..cd1b8d9 100644
--- 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;
-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';
+
-- 
cgit v1.2.1