diff --git a/faqs.pl b/faqs.pl

index cfccd2a99fabfe126c0702ed7564c5176d09aab6..67d706673da80a17b9ad8738ceca810baa8c73da 100755

--- a/faqs.pl

+++ b/faqs.pl

@@ -55,7 +55,7 @@

my @rows = $dbh->selectall_array(sql());

if ( !scalar @rows ) {

- push @return, 'No faqs found!';

+ push @return, ('No faqs found!', '');

}

else {

foreach (@rows) {

@@ -72,7 +72,6 @@ push @return, ('', @$_[2], '');

}

}

$dbh->disconnect();

- push @return, '';

return @return;

}

diff --git a/index.pl b/index.pl

index 066934a04c2b00054c03b873adf3d9dd8b0e528f..f7ad582c886b952c312275f7b49de21ce7e393a2 100755

--- a/index.pl

+++ b/index.pl

@@ -19,6 +19,10 @@ if (!defined($ENV{'SERVER_PROTOCOL'}) || $ENV{'SERVER_PROTOCOL'} ne 'GEMINI') {

write_response('CGI_ERROR', 'CGI execution error', undef);

}

+if ($ENV{'QUERY_STRING'} ne '' || $ENV{'PATH_INFO'} ne '') {

+ write_response('NOT_FOUND', 'File not found', undef);

+}

+

my @body = ();

push @body, header();

push @body, body();