From 83b799cfb2f4a59fbe6da83aa146b496faf379c6 Mon Sep 17 00:00:00 2001
From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Sun, 21 Mar 2010 20:05:38 +0000
Subject: [PATCH] make #metabib an alias for #metarecord

git-svn-id: svn://svn.open-ils.org/ILS/trunk@15924 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 .../OpenILS/Application/Storage/Driver/Pg/QueryParser.pm        | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm
index b956eae933..c8a2a5bb99 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm
@@ -404,7 +404,7 @@ sub toSQL {
     }
 
     my $key = 'm.source';
-    $key = 'm.metarecord' if (grep {$_->name eq 'metarecord'} @{$self->modifiers});
+    $key = 'm.metarecord' if (grep {$_->name eq 'metarecord' or $_->name eq 'metabib'} @{$self->modifiers});
 
     my ($before) = $self->find_filter('before');
     my ($after) = $self->find_filter('after');
-- 
2.43.2