JBAS-1832 Remove refs to legacy search language_filter
authorBill Erickson <berickxx@gmail.com>
Wed, 12 Sep 2018 14:43:28 +0000 (10:43 -0400)
committerBill Erickson <berickxx@gmail.com>
Thu, 21 Mar 2019 19:46:23 +0000 (15:46 -0400)
And remove a few other local unused bits.  File now matches master.

Signed-off-by: Bill Erickson <berickxx@gmail.com>
Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg/QueryParser.pm

index 2a16058..9410851 100644 (file)
@@ -887,11 +887,6 @@ sub toSQL {
         $bre_join = 'INNER JOIN biblio.record_entry bre ON m.source = bre.id AND NOT bre.deleted';
     }
 
-    my $mlf_join = '';
-    if ($$flat_plan{uses_mlf}) {
-        $mlf_join = 'JOIN metabib.language_filter AS mlf ON m.source = mlf.source';
-    }
-    
     my $desc = 'ASC';
     $desc = 'DESC' if ($self->find_modifier('descending'));
 
@@ -1161,7 +1156,6 @@ SELECT  id,
                 $lang_join
                 $c_attr_join
                 $b_attr_join
-                $mlf_join
           WHERE 1=1
                 $flat_where
           GROUP BY 1
@@ -1655,10 +1649,6 @@ sub flatten {
                         "search.calculate_visibility_attribute_test('status','{".join(',', @{$filter->args})."}',$negate)";
                 }
 
-            # TODO: is this comment still relevant?
-            # Case for displaying browse results
-            # Needs sub-casesses for title, author, subject, series, call number(id:bibcn)
-
             } elsif ($filter->name eq 'has_browse_entry') {
                 if (@{$filter->args} >= 2) {
                     my $entry = int(shift @{$filter->args});
@@ -1883,8 +1873,6 @@ package OpenILS::Application::Storage::Driver::Pg::QueryParser::query_plan::node
 use base 'QueryParser::query_plan::node';
 use List::MoreUtils qw/uniq/;
 use Data::Dumper;
-use OpenSRF::Utils::Logger qw($logger);
-
 
 sub abstract_node_additions {
     my $self = shift;