From f9d2fa784cf5fdeb6e99b71d7665777f203928db Mon Sep 17 00:00:00 2001
From: genjimoto <genjimoto>
Date: Mon, 22 Aug 2005 12:53:48 +0000
Subject: [PATCH] modified script to enable circulation system to show picture
 of borrower for verification purposes.

---
 circ/circulation.pl | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/circ/circulation.pl b/circ/circulation.pl
index 63d668eddc..e5696e554e 100755
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -120,12 +120,21 @@ if ($findborrower) {
 
 # get the borrower information.....
 my $borrower;
+my $picture;
+
+
 if ($borrowernumber) {
 	$borrower = getpatroninformation(\%env,$borrowernumber,0);
 	my ($od,$issue,$fines)=borrdata2(\%env,$borrowernumber);
 	$template->param(overduecount => $od,
 							issuecount => $issue,
 							finetotal => $fines);
+							my $htdocs = C4::Context->config('intrahtdocs');
+							$picture = "/borrowerimages/".$borrowernumber.".jpg";
+							if (-e $htdocs."$picture")
+							{ 
+  								$template->param(picture => $picture)
+							};
 }
 
 
-- 
2.39.5