From: miker Date: Fri, 7 Mar 2008 17:15:35 +0000 (+0000) Subject: trimming the record hashes X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=58a801768cd65f17b152b73546e6c3b63fb42730;p=Evergreen.git trimming the record hashes git-svn-id: svn://svn.open-ils.org/ILS/trunk@8902 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm index 9ff4fc811f..38a3036379 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm @@ -2487,6 +2487,13 @@ sub staged_fts { $log->debug("Search yielded ".scalar(@$recs)." checked, visible results with an approximate visible total of $estimate.",DEBUG); for my $rec (@$recs[$offset .. $offset + $limit - 1]) { + delete $$summary_row{checked}; + delete $$summary_row{visible}; + delete $$summary_row{excluded}; + delete $$summary_row{deleted}; + delete $$summary_row{total}; + $$summary_row{rel} = sprintf('%0.3f',$$summary_row{rel}); + $client->respond( $rec ); } return undef;