From 3bf860f54e284c836618bd75e1cfbd44135ba7d4 Mon Sep 17 00:00:00 2001 From: Yorhel Date: Wed, 1 May 2024 17:02:08 +0200 Subject: [PATCH] www: Don't throw an error on empty search query (Not that the current page is much better) --- www/index.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/www/index.pl b/www/index.pl index b4de51c..06b551b 100755 --- a/www/index.pl +++ b/www/index.pl @@ -611,7 +611,7 @@ TUWF::get '/browse/search' => sub { # Redirect if we have an exact match my @sectsql = length $sect ? ('AND section =', \$sect) : (); my $man = length $name && tuwf->dbRowi('SELECT name, section FROM mans WHERE name =', \$name, @sectsql); - return tuwf->resRedirect("/man/$man->{name}".(length $sect ? ".$man->{section}" : ''), 'temp') if length $man->{name}; + return tuwf->resRedirect("/man/$man->{name}".(length $sect ? ".$man->{section}" : ''), 'temp') if $man && length $man->{name}; # Otherwise, do case-insensitive glob search my $nameq = escape_like(lc $name) =~ tr/?*/_%/r;