checking deleted on copy

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5749 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm
index 014d79f..ac3ef98 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/ScriptBuilder.pm
@@ -111,7 +111,7 @@ sub fetch_bib_data {
                } elsif( $ctx->{copy_barcode} ) {
 
                        $ctx->{copy} = $e->search_asset_copy(
-                               [{barcode => $ctx->{copy_barcode}}, $flesh ])->[0]
+                               [{barcode => $ctx->{copy_barcode}, deleted => 'f'}, $flesh ])->[0]
                                or return $e->event;
                }
        }