koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha moredetail.pl,1.4.2.6,1.4.2.7


From: Steve Tonnesen
Subject: [Koha-cvs] CVS: koha moredetail.pl,1.4.2.6,1.4.2.7
Date: Tue, 29 Oct 2002 14:53:30 -0800

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv25373

Modified Files:
      Tag: rel-1-2
        moredetail.pl 
Log Message:
Formatting dollar outputs ($8.50 instead of 8.5)


Index: moredetail.pl
===================================================================
RCS file: /cvsroot/koha/koha/moredetail.pl,v
retrieving revision 1.4.2.6
retrieving revision 1.4.2.7
diff -C2 -r1.4.2.6 -r1.4.2.7
*** moredetail.pl       28 Oct 2002 22:59:46 -0000      1.4.2.6
--- moredetail.pl       29 Oct 2002 22:53:28 -0000      1.4.2.7
***************
*** 59,62 ****
--- 59,63 ----
  $dewey=~ s/\.$//;
  $data->{'dewey'}=$dewey;
+ $data->{'rentalcharge'}=sprintf "%.02f", $data->{'rentalcharge'};
  
  my @results;
***************
*** 78,81 ****
--- 79,83 ----
      $item->{'withdrawn'}=~ s/1/Yes/;
      $item->{'replacementprice'}+=0.00;
+     $item->{'replacementprice'}=sprintf "%.02f", $item->{'replacementprice'};
      my $year=substr($item->{'timestamp0'},0,4);
      my $mon=substr($item->{'timestamp0'},4,2);




reply via email to

[Prev in Thread] Current Thread [Next in Thread]