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 <gmc@esilibrary.com>
git-svn-id: svn://svn.open-ils.org/ILS/trunk@16837 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 bb715ef..dc6bf8b 100644 (file)
--- 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");