2 files changed, 12 insertions, 0 deletions

diff --git a/t/nntpd.t b/t/nntpd.t
index c6e34ed3..3698f98b 100644
--- a/t/nntpd.t
+++ b/t/nntpd.t
@@ -147,6 +147,8 @@ EOF
         is($buf, "201 server ready - post via email\r\n", 'got greeting');
         $s->autoflush(1);
 
+        ok(syswrite($s, "   \r\n"), 'wrote spaces');
+        ok(syswrite($s, "\r\n"), 'wrote nothing');
         syswrite($s, "NEWGROUPS\t19990424 000000 \033GMT\007\r\n");
         is(0, sysread($s, $buf, 4096), 'GOT EOF on cntrl');
 
diff --git a/t/psgi_search.t b/t/psgi_search.t
index 60a44bde..2f033016 100644
--- a/t/psgi_search.t
+++ b/t/psgi_search.t
@@ -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();