[Koha-cvs] CVS: koha moremember.pl,1.24,1.25

[Mike Hansen]

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

Modified Files:
        moremember.pl 
Log Message:


Index: moremember.pl
===================================================================
RCS file: /cvsroot/koha/koha/moremember.pl,v
retrieving revision 1.24
retrieving revision 1.25
diff -C2 -r1.24 -r1.25
*** moremember.pl       2 Feb 2003 07:18:37 -0000       1.24
--- moremember.pl       26 Mar 2003 04:22:19 -0000      1.25
***************
*** 40,43 ****
--- 40,44 ----
  use C4::Search;
  use Date::Manip;
+ use C4::Date;
  use C4::Reserves2;
  use C4::Circulation::Renewals2;
***************
*** 65,71 ****
  my $data=borrdata('',$bornum);
  
! $data->{'dateenrolled'} = slashifyDate($data->{'dateenrolled'});
! $data->{'expiry'} = slashifyDate($data->{'expiry'});
! $data->{'dateofbirth'} = slashifyDate($data->{'dateofbirth'});
  
  $data->{'ethnicity'} = fixEthnicity($data->{'ethnicity'});
--- 66,72 ----
  my $data=borrdata('',$bornum);
  
! $data->{'dateenrolled'} = format_date($data->{'dateenrolled'});
! $data->{'expiry'} = format_date($data->{'expiry'});
! $data->{'dateofbirth'} = format_date($data->{'dateofbirth'});
  
  $data->{'ethnicity'} = fixEthnicity($data->{'ethnicity'});