From 6427b179f0a524d7a7a789b7740286324c7cb904 Mon Sep 17 00:00:00 2001 From: erickson Date: Mon, 1 Jun 2009 20:45:19 +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@13285 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 e7fe1b27d1..4ba3e531e0 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm @@ -781,7 +781,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