added space between liniea track elements

[biopieces.git] / code_perl / Maasha / BBrowser / Track.pm

diff --git a/code_perl/Maasha/BBrowser/Track.pm b/code_perl/Maasha/BBrowser/Track.pm
index c43ca5f524eb5639b451940a61cd1ae8daf1b114..19602bdb3a6523278a4370aa62f2d99020aec05a 100644 (file)
--- a/code_perl/Maasha/BBrowser/Track.pm
+++ b/code_perl/Maasha/BBrowser/Track.pm
@@ -230,7 +230,7 @@ sub track_feature_linear
                 last if $x1 >= $ladder[ $y_step ] + 1; 
             }
 
-            $y1 = $cookie->{ 'TRACK_OFFSET' } + ( $cookie->{ 'FEAT_WIDTH' } * $y_step );
+            $y1 = $cookie->{ 'TRACK_OFFSET' } + ( ( 0.1 + $cookie->{ 'FEAT_WIDTH' } ) * $y_step );
 
             push @features, {
                 type       => 'rect',
@@ -247,7 +247,7 @@ sub track_feature_linear
                 y2         => $y1 + $cookie->{ 'FEAT_WIDTH' },
             };
 
-            $y_max = Maasha::Calc::max( $y_max, $y_step * $cookie->{ 'FEAT_WIDTH' } );
+            $y_max = Maasha::Calc::max( $y_max, $y_step * ( 0.1 + $cookie->{ 'FEAT_WIDTH' } ) );
 
             push @features, feature_align( $entry, $beg, $y1, $factor, $cookie->{ 'FEAT_WIDTH' } ) if $entry->{ 'ALIGN' } ne '.';