]> Sergey Matveev's repositories - public-inbox.git/blobdiff - t/psgi_search.t
Merge remote-tracking branch 'origin/master' into v2
[public-inbox.git] / t / psgi_search.t
index 60a44bdecbcbccdd4a11eb148e0c3936ec7ae9cb..2f033016ef8272d0699e2628ac212553a52822c3 100644 (file)
@@ -62,6 +62,16 @@ 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');
+
+       $res = $cb->(POST('/test/?q=s:bogus&x=m'));
+       is($res->code, 404, 'failed search result gives 404');
+       is_deeply([], $warn, 'no warnings');
 });
 
 done_testing();