From 4934979f2f9c61a0e9a6ed9e5e7bf715722f304c Mon Sep 17 00:00:00 2001
From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Mon, 23 Jan 2006 14:58:50 +0000
Subject: [PATCH] plugged in the 'env' object and now pushing env.isRenew into
 the script environment as appropriate

git-svn-id: svn://svn.open-ils.org/ILS/trunk@2795 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/javascript/backend/circ/circ_permit.js        | 1 +
 .../src/perlmods/OpenILS/Application/Circ/Circulate.pm     | 7 ++++++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/Open-ILS/src/javascript/backend/circ/circ_permit.js b/Open-ILS/src/javascript/backend/circ/circ_permit.js
index 5c7e778abd..c46600f459 100644
--- a/Open-ILS/src/javascript/backend/circ/circ_permit.js
+++ b/Open-ILS/src/javascript/backend/circ/circ_permit.js
@@ -14,6 +14,7 @@ log_debug('CIRC PERMIT: permit circ on ' +
 	', Patron fines: '		+ patron_info.fines +
 	', Copy status: '			+ copy.status.name +
 	', Copy location: '		+ copy.location.name +
+	', Is Renewal: '			+ ( (env.isRenewal) ? "yes" : "no" ) +
 	'');
 
 
diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
index 1fe5b70db9..a97f8bf3e0 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
@@ -71,7 +71,8 @@ sub create_circ_ctx {
 	my $evt;
 	my $ctx = {};
 	$ctx->{patron} = $patron;
-	$ctx->{type} = $params{type};
+	$ctx->{type}	= $params{type};
+	$ctx->{isrenew} = $params{isrenew};
 
 	if(!defined($cache{patron_standings})) {
 		$cache{patron_standings} = $apputils->fetch_patron_standings();
@@ -193,6 +194,9 @@ sub _build_circ_script_runner {
 	$runner->insert( 'result', {} );
 	$runner->insert( 'result.event', 'SUCCESS' );
 
+	$runner->insert('env', {});
+	$runner->insert('env.isRenewal', 1) if $ctx->{isrenew};
+
 	if(ref($ctx->{patron_circ_summary})) {
 		$runner->insert( 'patron_info', {} );
 		$runner->insert( 'patron_info.items_out', $ctx->{patron_circ_summary}->[0] );
@@ -261,6 +265,7 @@ sub permit_circ {
 		fetch_patron_circ_summary	=> 1,
 		fetch_copy_statuses			=> 1, 
 		fetch_copy_locations			=> 1, 
+		isrenew							=> ($isrenew) ? 1 : 0,
 		);
 	return $evt if $evt;
 
-- 
2.43.2