fixing authority lookup a bit
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 23 Jun 2006 15:45:52 +0000 (15:45 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 23 Jun 2006 15:45:52 +0000 (15:45 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@4741 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/authority.pm

index a957692..da3c7de 100644 (file)
@@ -59,6 +59,7 @@ sub find_authority_marc {
 
        my $fts = OpenILS::Application::Storage::FTS->compile($term, 'f.value', "f.$index_col");
 
+       $term =~ s/\W+$//gso;
        $term =~ s/'/''/gso;
        $term =~ s/\pM//gso;