From 740e0bfa52d0a9fa43693ceffcef05d0e41937a5 Mon Sep 17 00:00:00 2001
From: martinahansen <martinahansen@74ccb610-7750-0410-82ae-013aeee3265d>
Date: Fri, 29 Jan 2010 09:17:30 +0000
Subject: [PATCH] changed sorting in BGB

git-svn-id: http://biopieces.googlecode.com/svn/trunk@854 74ccb610-7750-0410-82ae-013aeee3265d
---
 code_perl/Maasha/BGB/Track.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/code_perl/Maasha/BGB/Track.pm b/code_perl/Maasha/BGB/Track.pm
index 64a3b6d..071c284 100644
--- a/code_perl/Maasha/BGB/Track.pm
+++ b/code_perl/Maasha/BGB/Track.pm
@@ -216,7 +216,7 @@ sub track_feature_linear
     
     my ( $factor, $entry, $y_step, @ladder, $y_max, $w, $x1, $y1, $x2, $y2, @features );
 
-    @{ $entries } = sort { $a->{ 'S_BEG' } <=> $b->{ 'S_BEG' } or $a->{ 'S_END' } <=> $b->{ 'S_END' } } @{ $entries };
+    @{ $entries } = sort { $a->{ 'S_BEG' } <=> $b->{ 'S_BEG' } or $b->{ 'S_END' } <=> $a->{ 'S_END' } } @{ $entries };
 
     $factor = $cookie->{ 'IMG_WIDTH' } / ( $end - $beg + 1 );
     $y_step = 0;
-- 
2.39.2