From 3f92c12f4b3e24bd89b08020605ef6121660250e Mon Sep 17 00:00:00 2001 From: miyagawa Date: Thu, 11 Oct 2007 21:35:39 +0000 Subject: update per Google Suggest API change git-svn-id: http://svn.bulknews.net/repos/public/WebService-Google-Suggest/trunk@2375 65690182-5df0-0310-9871-95da5a3706e7 --- t/01_suggest.t | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 't/01_suggest.t') diff --git a/t/01_suggest.t b/t/01_suggest.t index 7db220e..07dfc6a 100644 --- a/t/01_suggest.t +++ b/t/01_suggest.t @@ -1,5 +1,5 @@ use strict; -use Test::More tests => 4; +use Test::More tests => 5; BEGIN { use_ok 'WebService::Google::Suggest' } @@ -9,5 +9,6 @@ isa_ok($suggest->ua, "LWP::UserAgent", "ua() retuens LWP"); my @data = $suggest->complete("google"); is($data[0]->{query}, "google", "google completes to google"); +ok($data[0]->{results}, "google has more than 0 results"); is_deeply( [ $suggest->complete("udfg67a") ], [ ], "empty list" ); -- cgit 1.4.1