From ec6cce9cb4bfac4aeb0aabdb5d215af85ee53857 Mon Sep 17 00:00:00 2001 From: erickson Date: Wed, 2 Sep 2009 12:53:56 +0000 Subject: [PATCH] bypass hold fulfillment attempt when checking out pre/non cat items git-svn-id: svn://svn.open-ils.org/ILS/trunk@13948 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm index 0883c4b49d..6bd3481b89 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm @@ -1257,6 +1257,10 @@ sub bail_on_events { $self->bail_out(1); } + +# ------------------------------------------------------------------------------ +# When an item is checked out, see if we can fulfill a hold for this patron +# ------------------------------------------------------------------------------ sub handle_checkout_holds { my $self = shift; my $copy = $self->copy; @@ -1265,6 +1269,9 @@ sub handle_checkout_holds { my $e = $self->editor; $self->fulfilled_holds([]); + # pre/non-cats can't fulfill a hold + return if $self->is_precat or $self->is_noncat; + my $hold = $e->search_action_hold_request({ current_copy => $copy->id , cancel_time => undef, -- 2.11.0