[Koha-cvs] CVS: koha memberentry.pl,1.27,1.28

[Mike Hansen]

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

Modified Files:
	memberentry.pl 
Log Message:
Fixed Bug #230.


Index: memberentry.pl
===================================================================
RCS file: /cvsroot/koha/koha/memberentry.pl,v
retrieving revision 1.27
retrieving revision 1.28
diff -C2 -r1.27 -r1.28
*** memberentry.pl	25 Mar 2003 06:05:13 -0000	1.27
--- memberentry.pl	26 Mar 2003 03:02:13 -0000	1.28
***************
*** 37,40 ****
--- 37,41 ----
  use HTML::Template;
  use Date::Manip;
+ use C4::Date;
  
  my $input = new CGI;
***************
*** 177,183 ****
  
    #Convert dateofbirth to correct format
!   $data->{'dateofbirth'}=ParseDate($data->{'dateofbirth'});
!   $data->{'dateofbirth'}=UnixDate($data->{'dateofbirth'},'%d/%m/%Y');
! 
  
    $template->param( 
--- 178,182 ----
  
    #Convert dateofbirth to correct format
!   $data->{'dateofbirth'} = format_date($data->{'dateofbirth'});
  
    $template->param( 
***************
*** 209,213 ****
    			expiry		=> $data->{'expiry'},
    			cardnumber	=> $cardnumber,
!   			dateofbirth	=> $data->{'dateofbirth'});
  
  output_html_with_http_headers $input, $cookie, $template->output;
--- 208,213 ----
    			expiry		=> $data->{'expiry'},
    			cardnumber	=> $cardnumber,
!   			dateofbirth	=> $data->{'dateofbirth'},
! 			dateformat      => display_date_format());
  
  output_html_with_http_headers $input, $cookie, $template->output;