From: Robin H. Johnson <rjohnson@sitka.bclibraries.ca>
Date: Wed, 29 Feb 2012 22:12:21 +0000 (-0800)
Subject: We should NOT have deleted copies in the export.
X-Git-Url: https://git.sitka.bclibraries.ca/gitweb/?p=sitka%2Fsitka-tools.git;a=commitdiff_plain;h=589531815ed9cadbc616132b3d70e0c3faa7d2d1

We should NOT have deleted copies in the export.

Signed-off-by: Robin H. Johnson <rjohnson@sitka.bclibraries.ca>
---

diff --git a/marc_export_custom/marc_export_custom b/marc_export_custom/marc_export_custom
index 2728fde..8a544a0 100755
--- a/marc_export_custom/marc_export_custom
+++ b/marc_export_custom/marc_export_custom
@@ -453,6 +453,9 @@ sub add_bib_holdings {
                     my $circlib = $cp->circ_lib;
                     my $printlib = $cp->circ_lib;
 
+		    # Ignore deleted copies
+		    next COPYMAP if $cp->deleted;
+
                     if($cfg){
                         my $thisorg = $orgs{$circlib};