From 0ecfad353d6ac48a0551eec57286fe5c47cdff21 Mon Sep 17 00:00:00 2001 From: erickson Date: Wed, 6 Sep 2006 03:41:48 +0000 Subject: [PATCH] typo git-svn-id: svn://svn.open-ils.org/ILS/trunk@5969 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../perlmods/OpenILS/Application/Storage/Publisher/metabib.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 bc732760e7..97be7d21df 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm @@ -1997,7 +1997,7 @@ sub biblio_search_multi_class_fts { push @{ $bonus{'series'} }, { "CASE WHEN rd.item_lang = ? THEN 10 ELSE 1 END" => $pref_lang }; } - my $bonus_list = join ' * ', map { keys %$_ } (@{ $bonus{$search_class}, }; + my $bonus_list = join ' * ', map { keys %$_ } @{ $bonus{$search_class} }; $bonus_list ||= '1'; push @bonus_lists, $bonus_list,; -- 2.43.2