[freeside-commits] freeside/FS/FS Record.pm,1.131,1.132
Ivan,,,
ivan at wavetail.420.am
Mon Jan 22 22:51:56 PST 2007
Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv9372
Modified Files:
Record.pm
Log Message:
remove spurious duplicateion from lineitem patch
Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.131
retrieving revision 1.132
diff -u -d -r1.131 -r1.132
--- Record.pm 21 Jan 2007 21:45:28 -0000 1.131
+++ Record.pm 23 Jan 2007 06:51:54 -0000 1.132
@@ -1297,24 +1297,6 @@
=cut
-sub ut_floatn {
- my($self,$field)=@_ ;
- ($self->getfield($field) =~ /^(\d*)$/ ||
- $self->getfield($field) =~ /^(-?\d+\.\d+)$/ ||
- $self->getfield($field) =~ /^(-?\d+)$/ ||
- $self->getfield($field) =~ /^(-?\d+\.\d+e\d+)$/ ||
- $self->getfield($field) =~ /^(-?\d+e\d+)$/)
- or return "Illegal or empty (float) $field: ". $self->getfield($field);
- $self->setfield($field,$1);
- '';
-}
-=item ut_floatn COLUMN
-
-Check/untaint floating point numeric data: 1.1, 1, 1.1e10, 1e10. May be
-null. If there is an error, returns the error, otherwise returns false.
-
-=cut
-
#false laziness w/ut_ipn
sub ut_floatn {
my( $self, $field ) = @_;
More information about the freeside-commits
mailing list