From 324913c861b22e8dcc0f2bf29674cd7536d9041c Mon Sep 17 00:00:00 2001 From: gmc Date: Wed, 30 Jun 2010 23:06:15 +0000 Subject: [PATCH] bug #600432: fix MARC expert search Fix gitch introduced via overzealous tidying that broke MARC expert search; in the expression @array || $scalar, @array is evaluated in scalar context and thus returns the number of elements in it. Signed-off-by: Galen Charlton git-svn-id: svn://svn.open-ils.org/ILS/trunk@16837 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm | 3 ++- 1 file changed, 2 insertions(+), 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 bb715ef94..dc6bf8be9 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm @@ -432,7 +432,8 @@ sub biblio_multi_search_full_rec { my $term = $$arg{term}; my $limiters = $$arg{restrict}; - my ($index_col) = metabib::full_rec->columns('FTS') || 'value'; + my ($index_col) = metabib::full_rec->columns('FTS'); + $index_col ||= 'value'; my $search_table = metabib::full_rec->table; my $fts = OpenILS::Application::Storage::FTS->compile('default' => $term, 'value',"$index_col"); -- 2.11.0