From f9a5e2255c1b0936cbf2e3b2577ae7ea6d002532 Mon Sep 17 00:00:00 2001 From: erickson Date: Sat, 2 Sep 2006 20:32:59 +0000 Subject: [PATCH] not returning BAD_STATUS if in cataloging git-svn-id: svn://svn.open-ils.org/ILS/trunk@5872 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm index 25e6d6f4c2..1f623ed5c4 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm @@ -1142,7 +1142,6 @@ sub do_checkin { { target_copy => $self->copy->id, checkin_time => undef })->[0]); } - # if the circ is marked as 'claims returned', add the event to the list $self->push_events(OpenILS::Event->new('CIRC_CLAIMS_RETURNED')) if ($self->circ and $self->circ->stop_fines @@ -1582,6 +1581,7 @@ sub check_checkin_copy_status { $status == OILS_COPY_STATUS_IN_PROCESS || $status == OILS_COPY_STATUS_ON_HOLDS_SHELF || $status == OILS_COPY_STATUS_IN_TRANSIT || + $status == OILS_COPY_STATUS_CATALOGING || $status == OILS_COPY_STATUS_RESHELVING ); return OpenILS::Event->new('COPY_STATUS_LOST', payload => $copy ) -- 2.43.2