From 1e2e88a9bc71fbe9429df82cc96101350de3b0b9 Mon Sep 17 00:00:00 2001
From: Monika Komorowska <mk8@sanger.ac.uk>
Date: Tue, 17 May 2011 10:13:01 +0000
Subject: [PATCH] Changed percentage calculation in warnings.

---
 misc-scripts/xref_mapping/XrefMapper/TestMappings.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/misc-scripts/xref_mapping/XrefMapper/TestMappings.pm b/misc-scripts/xref_mapping/XrefMapper/TestMappings.pm
index bf6197397f..23c80f4e64 100644
--- a/misc-scripts/xref_mapping/XrefMapper/TestMappings.pm
+++ b/misc-scripts/xref_mapping/XrefMapper/TestMappings.pm
@@ -11,6 +11,7 @@ use Cwd;
 use DBI;
 use File::Basename;
 use IPC::Open3;
+use POSIX;
 
 ##########################################
 # Testing  (may be moved to healthchecks)
@@ -329,10 +330,10 @@ sub entry_number_check{
     if(defined($new_object_xref_count{$name})){
       $change = (($new_object_xref_count{$name} - $count)/$count) * 100;
       if($change > 5){ # increase of 5%
-	print "WARNING: $name has increased by " . floor($change) . "\% was $count now ". $new_object_xref_count{$name} . "\n" if($self->mapper->verbose); 
+	print "WARNING: $name has increased by ".floor($change)."\% was $count now ". $new_object_xref_count{$name} . "\n" if($self->mapper->verbose); 
       }
       elsif($change < -5){ # decrease by 5%
-	print "WARNING: $name has decreased by " . floor($change) . " \% was $count now ". $new_object_xref_count{$name} . "\n" if($self->mapper->verbose); 
+	print "WARNING: $name has decreased by ".floor($change)." \% was $count now ". $new_object_xref_count{$name} . "\n" if($self->mapper->verbose); 
       }
     }
     else{
-- 
GitLab