[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;