From 866bcd7a437cdf5ceff97ed93ce737cb270fa5d1 Mon Sep 17 00:00:00 2001 From: miker Date: Fri, 7 Mar 2008 17:18:31 +0000 Subject: [PATCH] actually trimming the record hashes git-svn-id: svn://svn.open-ils.org/ILS/trunk@8903 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../OpenILS/Application/Storage/Publisher/metabib.pm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) 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 38a3036379..5e719906d6 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm @@ -2487,12 +2487,12 @@ 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}); + delete $$rec{checked}; + delete $$rec{visible}; + delete $$rec{excluded}; + delete $$rec{deleted}; + delete $$rec{total}; + $$rec{rel} = sprintf('%0.3f',$$rec{rel}); $client->respond( $rec ); } -- 2.43.2