[Koha-cvs] CVS: koha/circ circulation.pl,1.52,1.53
Mike Hansen
wolfpac444 at users.sourceforge.net
Thu May 8 15:04:18 CEST 2003
Update of /cvsroot/koha/koha/circ
In directory sc8-pr-cvs1:/tmp/cvs-serv21565/koha/circ
Modified Files:
circulation.pl
Log Message:
Fixed bug #169
Index: circulation.pl
===================================================================
RCS file: /cvsroot/koha/koha/circ/circulation.pl,v
retrieving revision 1.52
retrieving revision 1.53
diff -C2 -r1.52 -r1.53
*** circulation.pl 5 May 2003 21:22:24 -0000 1.52
--- circulation.pl 8 May 2003 13:04:15 -0000 1.53
***************
*** 34,37 ****
--- 34,38 ----
use C4::Koha;
use HTML::Template;
+ use C4::Date;
my $query=new CGI;
***************
*** 219,227 ****
my $dd = $book->{'date_due'};
my $datedue = $book->{'date_due'};
! #convert to nz style dates
! #this should be set with some kinda config variable
! my @tempdate=split(/-/,$dd);
! $dd="$tempdate[2]/$tempdate[1]/$tempdate[0]";
! $datedue=~s/-//g;
if ($datedue < $todaysdate) {
$dd="<font color=red>$dd</font>\n";
--- 220,225 ----
my $dd = $book->{'date_due'};
my $datedue = $book->{'date_due'};
! $dd=format_date($dd);
! $datedue=~s/-//g;
if ($datedue < $todaysdate) {
$dd="<font color=red>$dd</font>\n";
***************
*** 244,252 ****
my $dd = $book->{'date_due'};
my $datedue = $book->{'date_due'};
! #convert to nz style dates
! #this should be set with some kinda config variable
! my @tempdate=split(/-/,$dd);
! $dd="$tempdate[2]/$tempdate[1]/$tempdate[0]";
! $datedue=~s/-//g;
if ($datedue < $todaysdate) {
$dd="<font color=red>$dd</font>\n";
--- 242,247 ----
my $dd = $book->{'date_due'};
my $datedue = $book->{'date_due'};
! $dd=format_date($dd);
! $datedue=~s/-//g;
if ($datedue < $todaysdate) {
$dd="<font color=red>$dd</font>\n";
***************
*** 371,375 ****
$invalidduedate="Invalid Due Date Specified. Book was not issued. $year is not a leap year.<p>\n";
} else {
! $date="$year-$month-$day";
}
}
--- 366,370 ----
$invalidduedate="Invalid Due Date Specified. Book was not issued. $year is not a leap year.<p>\n";
} else {
! $date=format_date("$year-$month-$day");
}
}
More information about the Koha-cvs
mailing list