From 2a27b0daa67e561d871de8c682ba9788ae613dbb Mon Sep 17 00:00:00 2001 From: miker Date: Sun, 11 Feb 2007 19:28:53 +0000 Subject: [PATCH] removed ranking normalization as it is entirely useless to do this on the server side git-svn-id: svn://svn.open-ils.org/ILS/trunk@6927 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../OpenILS/Application/Storage/Publisher/metabib.pm | 13 +++++++------ 1 file changed, 7 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 5077ee3ee5..4d0ca95077 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm @@ -2233,17 +2233,18 @@ sub biblio_search_multi_class_fts { $log->debug("Search yielded ".scalar(@$recs)." results.",DEBUG); - my $max = 0; - $max = 1 if (!@$recs); - for (@$recs) { - $max = $$_[1] if ($$_[1] > $max); - } +# my $max = 0; +# $max = 1 if (!@$recs); +# for (@$recs) { +# $max = $$_[1] if ($$_[1] > $max); +# } my $count = scalar(@$recs); for my $rec (@$recs[$offset .. $offset + $limit - 1]) { next unless ($$rec[0]); my ($mrid,$rank) = @$rec; - $client->respond( [$mrid, sprintf('%0.3f',$rank/$max), $count] ); +# $client->respond( [$mrid, sprintf('%0.3f',$rank/$max), $count] ); + $client->respond( [$mrid, sprintf('%0.3f',$rank), $count] ); } return undef; } -- 2.11.0