allowed re-use of deleted barcodes
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 29 Aug 2006 00:03:27 +0000 (00:03 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 29 Aug 2006 00:03:27 +0000 (00:03 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@5747 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Cat.pm

index eb2d128..d19a144 100644 (file)
@@ -1126,7 +1126,7 @@ sub create_copy {
        my( $editor, $vol, $copy ) = @_;
 
        my $existing = $editor->search_asset_copy(
-               { barcode => $copy->barcode } );
+               { barcode => $copy->barcode, deleted => 'f' } );
        
        return OpenILS::Event->new('ITEM_BARCODE_EXISTS') if @$existing;