From ef784d82deb3713d9fec132f9c9cc1ea5596da4f Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 23 Jan 2007 06:51:54 +0000
Subject: [PATCH] remove spurious duplicateion from lineitem patch

---
 FS/FS/Record.pm | 18 ------------------
 1 file changed, 18 deletions(-)

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 08811a2d4..34b556eea 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -1297,24 +1297,6 @@ null.  If there is an error, returns the error, otherwise returns false.
 
 =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 ) = @_;
-- 
2.11.0