[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.87,1.87.2.1

[Joshua Ferraro]

Update of /cvsroot/koha/koha/C4/Circulation
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11854

Modified Files:
      Tag: rel_2_2
        Circ2.pm 
Log Message:
Fix for bug 937.


Index: Circ2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.87
retrieving revision 1.87.2.1
diff -C2 -r1.87 -r1.87.2.1
*** Circ2.pm    15 Dec 2004 10:47:09 -0000      1.87
--- Circ2.pm    22 Feb 2005 22:41:24 -0000      1.87.2.1
***************
*** 1660,1664 ****
                my $borrower = getpatroninformation($env,$bornum,0);
                my $loanlength = 
getLoanLength($borrower->{'categorycode'},$iteminformation->{'itemtype'},$borrower->{'branchcode'});
!               $datedue = 
UnixDate(DateCalc($iteminformation->{date_due},"$loanlength days"),"%Y-%m-%d");
        }
  
--- 1660,1664 ----
                my $borrower = getpatroninformation($env,$bornum,0);
                my $loanlength = 
getLoanLength($borrower->{'categorycode'},$iteminformation->{'itemtype'},$borrower->{'branchcode'});
!               $datedue = UnixDate(DateCalc("today","$loanlength 
days"),"%Y-%m-%d");
        }