[Koha-cvs] CVS: koha memberentry.pl,1.34,1.35

[Chris Cormack]

Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1:/tmp/cvs-serv2420

Modified Files:
	memberentry.pl 
Log Message:
Bug fix for bug 524


Index: memberentry.pl
===================================================================
RCS file: /cvsroot/koha/koha/memberentry.pl,v
retrieving revision 1.34
retrieving revision 1.35
diff -C2 -r1.34 -r1.35
*** memberentry.pl	2 Jul 2003 00:29:51 -0000	1.34
--- memberentry.pl	9 Jul 2003 20:27:55 -0000	1.35
***************
*** 55,60 ****
  }
  my $type=$input->param('type') || '';
! my $modify=$input->param('modify.x');
! my $delete=$input->param('delete.x');
  if ($delete){
  	print $input->redirect("/cgi-bin/koha/deletemem.pl?member=$member");
--- 55,60 ----
  }
  my $type=$input->param('type') || '';
! my $modify=$input->param('modify');
! my $delete=$input->param('delete');
  if ($delete){
  	print $input->redirect("/cgi-bin/koha/deletemem.pl?member=$member");
***************
*** 181,184 ****
--- 181,185 ----
  				dateofbirth	=> $data->{'dateofbirth'},
  				dateformat      => display_date_format(),
+ 			        modify          => $modify,
  				CGIbranch => $CGIbranch);
  	output_html_with_http_headers $input, $cookie, $template->output;