From 1c8c896785d37929132820a31e178da3f4aef289 Mon Sep 17 00:00:00 2001
From: martinahansen <martinahansen@74ccb610-7750-0410-82ae-013aeee3265d>
Date: Thu, 28 Jan 2010 07:56:21 +0000
Subject: [PATCH] repair on plot_karyogram

git-svn-id: http://biopieces.googlecode.com/svn/trunk@851 74ccb610-7750-0410-82ae-013aeee3265d
---
 code_perl/Maasha/Plot.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/code_perl/Maasha/Plot.pm b/code_perl/Maasha/Plot.pm
index 682c46f..906b7ac 100644
--- a/code_perl/Maasha/Plot.pm
+++ b/code_perl/Maasha/Plot.pm
@@ -502,10 +502,10 @@ sub chromosome_layout
         map { $_->[ 0 ] *= $factor; $_->[ 1 ] *= $factor } @{ $feat_list->{ $feat } };
     }
 
-#    @list = sort { $A = $a; $B = $b; $A =~ s/chr//; $B =~ s/chr//; $A <=> $B } keys %{ $karyo_list };
+    @list = sort { $A = $a; $B = $b; $A =~ s/chr//; $B =~ s/chr//; $A <=> $B } keys %{ $karyo_list };
 
-#    splice @list, 0, 2;
-#    push @list, "chrX", "chrY";
+    splice @list, 0, 2;
+    push @list, "chrX", "chrY";
 
     $i = 0;
     
-- 
2.39.2