[Koha-cvs] CVS: koha/C4 Format.pm,1.6,1.7
Andrew Arensburger
arensb at users.sourceforge.net
Sun Oct 13 08:03:23 CEST 2002
Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv19141
Modified Files:
Format.pm
Log Message:
Added some FIXME comments.
Added RCS magic comment.
Removed unused finalizer.
Index: Format.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Format.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** Format.pm 10 Oct 2002 04:34:51 -0000 1.6
--- Format.pm 13 Oct 2002 06:03:20 -0000 1.7
***************
*** 1,4 ****
! package C4::Format; #assumes C4/Format
# Copyright 2000-2002 Katipo Communications
--- 1,5 ----
! package C4::Format;
+ # $Id$
# Copyright 2000-2002 Katipo Communications
***************
*** 122,125 ****
--- 123,128 ----
part will be split into three-digit groups separated by commas.
+ C<$env> is effectively ignored.
+
=cut
#'
***************
*** 211,222 ****
# Right-pad the decimal part to the given number of digits.
if ($right > 0) {
! $tempdec = $tempdec.("0"x$right);
$tempdec = substr($tempdec,0,$right);
! $fnumb = $fnumb.".".$tempdec;
}
return ($fnumb); # FIXME - Shouldn't return a list.
}
-
- END { } # module clean-up code here (global destructor)
1;
--- 214,223 ----
# Right-pad the decimal part to the given number of digits.
if ($right > 0) {
! $tempdec = $tempdec.("0"x$right); # FIXME - .=
$tempdec = substr($tempdec,0,$right);
! $fnumb = $fnumb.".".$tempdec; # FIXME - .=
}
return ($fnumb); # FIXME - Shouldn't return a list.
}
1;
More information about the Koha-cvs
mailing list