# $Id: null-empty.t,v 1.2 2006-04-21 20:59:08 Daddy Exp $

use ExtUtils::testlib;
use Test::More 'no_plan';

my $sMod;
BEGIN
  {
  $sMod = 'WWW::Search::Null::Empty';
  use_ok('WWW::Search');
  use_ok($sMod);
  } # end of BEGIN block
ok(my $iCount = 4);
ok(my $oSearch = new WWW::Search('Null::Empty'));
isa_ok($oSearch, $sMod);
$oSearch->native_query('Makes no difference what you search for...');
my @aoResults = $oSearch->results;
is(scalar(@aoResults), 0, 'got zero results');
is($oSearch->approximate_result_count, 0, 'got the right approx_results');
# ...But you get an HTTP::Response object with a code of 200
my $oResponse = $oSearch->response;
is($oResponse->code, 200, 'response code');
ok($oResponse->is_success, 'HTTP::Response is success');

__END__