X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FModules%2FGoogle.pl;h=a8a66f93de1cdf2b4347e68c6fea0b0861d0ef5f;hb=82b7822f9140d90a6c714b1eec0fb8beb17e53dd;hp=1fab907e866ff0dee3e933edf99eaac177dba958;hpb=d1caf563f3d609bbcf4ab810b9d49a460c115317;p=infobot.git diff --git a/src/Modules/Google.pl b/src/Modules/Google.pl index 1fab907..a8a66f9 100644 --- a/src/Modules/Google.pl +++ b/src/Modules/Google.pl @@ -36,11 +36,18 @@ sub GoogleSearch { return; } + # No results found + if ( not $Search->responseData->results ) { + &::DEBUG( "Google::GoogleSearch> $retval" ); + &::msg( $::who, $retval); + return; + } + my $data = $Search->responseData; my $cursor = $data->cursor; my @results = $data->results; - my $count; + $retval = "$where says \"\002$what\002\" is at "; foreach my $r (@results) { my $url = $r->url;