From: Bill Erickson <berickxx@gmail.com>
Date: Mon, 26 Sep 2016 14:29:09 +0000 (-0700)
Subject: JBAS-1437 Backstage process bib/auth file names update
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=f14472ce8200bfc870cc9bfe69ce3afb43f4b2e3;p=working%2FEvergreen.git

JBAS-1437 Backstage process bib/auth file names update

Handle inconsistencies in BS results file naming.

* Process files ending in .UTF8 or .MRC
* Treat file with name AUTH as new/modified authority records.

Signed-off-by: Bill Erickson <berickxx@gmail.com>
---

diff --git a/KCLS/backstage/process-backstage-files.pl b/KCLS/backstage/process-backstage-files.pl
index 7fb0aee709..de0fa646b4 100755
--- a/KCLS/backstage/process-backstage-files.pl
+++ b/KCLS/backstage/process-backstage-files.pl
@@ -153,7 +153,7 @@ sub process_zip_file {
 
     # Avoid processing XLS and HTM files.  
     # All of the MARC files end in .UTF8.
-    for my $member ($zip->membersMatching('.*\.UTF8')) {
+    for my $member ($zip->membersMatching('.*(\.UTF8|\.MRC)')) {
 
         my $basename = basename($member->fileName());
 
@@ -175,7 +175,7 @@ sub process_zip_file {
 
             handle_deleted_auths($marc_batch);
 
-        } elsif ($basename =~ /CHG|NEW/) {
+        } elsif ($basename =~ /CHG|NEW|AUTH/) {
 
             handle_modified_auths($marc_batch);