From 195f9de1b4ca3a98be73eb81af163e71e137f96b Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 8 Sep 2006 14:31:53 +0000
Subject: [PATCH] not check for holds on shelf for non-cats

git-svn-id: svn://svn.open-ils.org/ILS/trunk@6028 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
index 60e9c0ee65..4c4a577028 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
@@ -523,6 +523,8 @@ sub check_captured_holds {
    my $copy    = $self->copy;
    my $patron  = $self->patron;
 
+	return undef unless $copy;
+
 	my $s = $U->copy_status($copy->status)->id;
 	return unless $s == OILS_COPY_STATUS_ON_HOLDS_SHELF;
 	$logger->info("circulator: copy is on holds shelf, searching for the correct hold");
-- 
2.43.2