[Koha-cvs] koha/members mancredit.pl

Joshua Ferraro jmf at liblime.com
Tue Mar 20 02:45:19 CET 2007


CVSROOT:	/sources/koha
Module name:	koha
Changes by:	Joshua Ferraro <kados>	07/03/20 01:45:18

Modified files:
	members        : mancredit.pl 

Log message:
	adding name for template
	re-tabing

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/members/mancredit.pl?cvsroot=koha&r1=1.6&r2=1.7

Patches:
Index: mancredit.pl
===================================================================
RCS file: /sources/koha/koha/members/mancredit.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- mancredit.pl	9 Mar 2007 23:30:17 -0000	1.6
+++ mancredit.pl	20 Mar 2007 01:45:18 -0000	1.7
@@ -31,11 +31,12 @@
 use C4::Accounts;
 my $input=new CGI;
 
-
 my $borrowernumber=$input->param('borrowernumber');
+
 #get borrower details
 my $data=borrdata('',$borrowernumber);
 my $add=$input->param('add');
+
 if ($add){
   my $itemnum=$input->param('itemnum');
   my $desc=$input->param('desc');
@@ -53,7 +54,11 @@
 					flagsrequired => {borrowers => 1},
 					debug => 1,
 					});
-	$template->param( borrowernumber => $borrowernumber);
+    $template->param(
+                    borrowernumber => $borrowernumber,
+                    firstname => $data->{'firstname'},
+                    surname  => $data->{'surname'},
+    );
 	print $input->header(
 	    -type => guesstype($template->output),
 	    -cookie => $cookie





More information about the Koha-cvs mailing list