From f34b8a38ef123c4fc346ed610100f739641d0d73 Mon Sep 17 00:00:00 2001 From: erickson Date: Mon, 1 Jun 2009 20:45:28 +0000 Subject: [PATCH] make the input test a little more strict (require the presence of a search term) git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_4_0@13286 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm index de6043f316..dc24a5aae0 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm @@ -768,7 +768,10 @@ sub staged_search { $method .= '.staff' if $self->api_name =~ /staff$/; $method .= '.atomic'; - return {count => 0} unless ($search_hash and $search_hash->{searches}); + return {count => 0} unless ( + $search_hash and + $search_hash->{searches} and + scalar( keys %{$search_hash->{searches}} )); my $search_duration; my $user_offset = $search_hash->{offset} || 0; # user-specified offset -- 2.11.0