From: erickson Date: Mon, 24 Mar 2008 19:57:34 +0000 (+0000) Subject: trimming null entries from end of results array X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=51987b5711caf20b592fbd3cd297a2e065bd915b;p=Evergreen.git trimming null entries from end of results array git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_2@9126 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm index 160b295866..a09cbe50cc 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm @@ -767,7 +767,7 @@ sub staged_search { last if $summary->{checked} < $PAGE_SIZE; } - my @results = @$all_results[$user_offset..($user_offset + $user_limit - 1)]; + my @results = grep {defined $_} @$all_results[$user_offset..($user_offset + $user_limit - 1)]; return { count => $est_hit_count,