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

[Joshua Ferraro]

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

Modified Files:
	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.88
diff -C2 -r1.87 -r1.88
*** Circ2.pm	15 Dec 2004 10:47:09 -0000	1.87
--- Circ2.pm	22 Feb 2005 22:40:15 -0000	1.88
***************
*** 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");
  	}