From 95ee62ebae189f602500ccb39f68076c62ed1bc7 Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 21 Sep 2006 13:41:06 +0000
Subject: [PATCH] un-fleshing age_protect object on copy update to prevent
 update failure

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm b/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
index fce55b42bb..c9f1ba5e27 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
@@ -1049,6 +1049,9 @@ sub update_copy {
 	$copy->editor($editor->requestor->id);
 	$copy->edit_date('now');
 
+	$copy->age_protect( $copy->age_protect->id )
+		if ref $copy->age_protect;
+
 	fix_copy_price($copy);
 	return $editor->event unless
 		$editor->update_asset_copy( 
-- 
2.11.0