Bio::Graphics::Panel, add_track, add_feature repeating labels

View: New views
1 Messages — Rating Filter:   Alert me  

Bio::Graphics::Panel, add_track, add_feature repeating labels

by Mark Lewis-6 :: Rate this Message:

Reply to Author | View Threaded | Show Only this Message


Hello,

I'm using the above mod to add glyph tracks and contained features to a
panel object; for each glyph, the label for some reason is being written
twice, once above the other eg:

CCAATBOX1
CCAATBOX1
+-----------+
|           |
+-----------+

The code I'm using is:

## PANEL DECLARATION

$panel = Bio::Graphics::Panel->new(-length        => $zoom,                
# length of panel
-width         => $imgWidth,               # physical width of img in px
-pad_top       => 10,                      # padding
-pad_bottom    => 10,
-pad_left      => 10,
-pad_right     => 10,
-bgcolor       => $bgColour,      
-grid          => 'true',
-gridcolor     => '#cccccc',
-gridmajorcolor => '#888888',
-all_callbacks => 'true',                  # for coloured URE bars
-offset        => $offset,                 # decremented by $zoom at loop
end
);

## TRACK DECLARATION
$track = $panel->add_track(
                              -glyph     => 'segments',
                              -linewidth => 2,
                              -height    => 8,
                              -fontcolor => $txtCol,
                              -label     => 1,
                              -description => 0,
                              -bgcolor   => sub {
                                 my($feat)  = shift;
                                 my($score) = $feat->score;
                                 return ($cols[$score]);
                              },
                              -bump        => 1
                    );

## GLYPH ADDITION
my($feature) = Bio::SeqFeature::Generic->new(-display_name => $SEQname,
-score        => $SEQcol,
-start        => $SEQstart,
-end          => $SEQend,
-tag          => { new => 1,
                                                           id => $featureId }
);
$track->add_feature($feature);

where $SEQ\w+ are passed from my subsequence source.

Can anybody perhaps comment on what I might be doing wrong in these
statements which might cause the above symptom?

Many thanks
Mark
--
mq
mindrail.net

------------------------------------------------------------------------------
Come build with us! The BlackBerry(R) Developer Conference in SF, CA
is the only developer event you need to attend this year. Jumpstart your
developing skills, take BlackBerry mobile applications to market and stay
ahead of the curve. Join us from November 9 - 12, 2009. Register now!
http://p.sf.net/sfu/devconference
_______________________________________________
Gmod-gbrowse mailing list
Gmod-gbrowse@...
https://lists.sourceforge.net/lists/listinfo/gmod-gbrowse