Permalink
Browse files

Don't fail if ->hseqname not available

  • Loading branch information...
1 parent 390b4a8 commit 8272d380a91307667b69084093b13da8222dc706 @nicklangridge nicklangridge committed Feb 24, 2014
Showing with 9 additions and 0 deletions.
  1. +9 −0 modules/Bio/EnsEMBL/GlyphSet/bigwig.pm
@@ -154,6 +154,15 @@ sub feature_title {
return sprintf '%.2f', $f->score; # the score is all that we want to show
}
+sub feature_group {
+ my ($self, $f) = @_;
+ my $name = '';
+ if ($f->can('hseqname')) {
+ ($name = $f->hseqname) =~ s/(\..*|T7|SP6)$//; # this regexp will remove the differences in names between the ends of BACs/FOSmids.
+ }
+ return $name;
+}
+
sub features {
my $self = shift;

0 comments on commit 8272d38

Please sign in to comment.