From 0cd55075b67b82b8b3817e2786e11b147f8d24a1 Mon Sep 17 00:00:00 2001 From: martinahansen Date: Fri, 5 Mar 2010 13:22:49 +0000 Subject: [PATCH] layout of wiggle improved git-svn-id: http://biopieces.googlecode.com/svn/trunk@895 74ccb610-7750-0410-82ae-013aeee3265d --- code_perl/Maasha/BGB/Track.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/code_perl/Maasha/BGB/Track.pm b/code_perl/Maasha/BGB/Track.pm index 8056ec2..5322636 100644 --- a/code_perl/Maasha/BGB/Track.pm +++ b/code_perl/Maasha/BGB/Track.pm @@ -227,6 +227,8 @@ sub track_wiggle my ( $i, $max_val, $min_val, $factor, $factor_height, $x1, $y1, $x2, $y2, $block_max, $mean, @features ); + $cookie->{ 'TRACK_OFFSET' } += 10; + $factor = $cookie->{ 'IMG_WIDTH' } / ( $end - $beg ); ( $min_val, $max_val ) = Maasha::Calc::minmax( $vals ); @@ -287,7 +289,7 @@ sub track_wiggle font_size => $cookie->{ 'SEQ_FONT_SIZE' } - 2, color => $cookie->{ 'SEQ_COLOR' }, x1 => 0, - y1 => $cookie->{ 'TRACK_OFFSET' }, + y1 => $cookie->{ 'TRACK_OFFSET' } - 5, }; $cookie->{ 'TRACK_OFFSET' } += $cookie->{ 'WIGGLE_HEIGHT' } + $cookie->{ 'TRACK_SPACE' }; -- 2.39.2