From 9d815c25ac2f4b722c62c0b95e5fc605f4384a20 Mon Sep 17 00:00:00 2001 From: erickson Date: Wed, 30 Sep 2009 19:45:56 +0000 Subject: [PATCH] during renewal, capture link to parent_circ for building the 'renewal chain' git-svn-id: svn://svn.open-ils.org/ILS/trunk@14232 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm index 37123f5eaf..bd9ef48f66 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm @@ -406,6 +406,7 @@ my @AUTOLOAD_FIELDS = qw/ capture noop void_overdues + parent_circ /; @@ -1539,6 +1540,9 @@ sub build_checkout_circ_object { $circ->workstation($self->editor->requestor->wsid) if defined $self->editor->requestor->wsid; + # renewals maintain a link to the parent circulation + $circ->parent_circ($self->parent_circ); + if( $self->is_renewal ) { $circ->opac_renewal('t') if $self->opac_renewal; $circ->phone_renewal('t') if $self->phone_renewal; @@ -2542,6 +2546,7 @@ sub do_renew { # ----------------------------------------------------------------- + $self->parent_circ($circ->id); $self->renewal_remaining( $circ->renewal_remaining - 1 ); $self->circ($circ); -- 2.43.2