diff options
Diffstat (limited to 't')
-rw-r--r-- | t/psgi_search.t | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/t/psgi_search.t b/t/psgi_search.t index 1df38691..84b3daa3 100644 --- a/t/psgi_search.t +++ b/t/psgi_search.t @@ -64,6 +64,12 @@ test_psgi(sub { $www->call(@_) }, sub { is('%C3%86var', (keys %uniq)[0], 'matches original query'); ok(index($html, 'by Ævar Arnfjörð Bjarmason') >= 0, "displayed Ævar's name properly in HTML"); + + my $warn = []; + local $SIG{__WARN__} = sub { push @$warn, @_ }; + $res = $cb->(GET('/test/?q=s:test&l=5e')); + is($res->code, 200, 'successful search result'); + is_deeply([], $warn, 'no warnings from non-numeric comparison'); }); done_testing(); |