From 302313b23411dc118f3ca2bbb17ada60a5949b04 Mon Sep 17 00:00:00 2001 From: Thomas Berezansky Date: Tue, 11 Sep 2012 09:48:39 -0400 Subject: [PATCH] Add bib_source filter Because it would likely be very useful, if only for staff. Signed-off-by: Thomas Berezansky Conflicts: Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm --- .../lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm index 1b950805c4..9d6f2dc1e9 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm @@ -481,6 +481,7 @@ __PACKAGE__->add_search_filter( 'during' ); __PACKAGE__->add_search_filter( 'statuses' ); __PACKAGE__->add_search_filter( 'locations' ); __PACKAGE__->add_search_filter( 'location_groups' ); +__PACKAGE__->add_search_filter( 'bib_source' ); __PACKAGE__->add_search_filter( 'site' ); __PACKAGE__->add_search_filter( 'pref_ou' ); __PACKAGE__->add_search_filter( 'lasso' ); @@ -885,6 +886,12 @@ sub flatten { $where .= "$key ${NOT}IN (" . join(',', map { $self->QueryParser->quote_value($_) } @{ $filter->args}) . ')'; } } + case 'bib_source' { + if (@{$filter->args} > 0) { + $where .= $joiner if $where ne '('; + $where .= "bre.source IN (" . join(',', map { $self->QueryParser->quote_value($_) } @{ $filter->args }) . ")"; + } + } } } } -- 2.11.0