Permalink
Browse files

fix a warning

  • Loading branch information...
1 parent 443d399 commit cc7458e5d1b2aff058a8481de8a405f965c1d6e3 @cjfields cjfields committed Jul 10, 2014
Showing with 1 addition and 1 deletion.
  1. +1 −1 Bio/Location/Split.pm
View
2 Bio/Location/Split.pm
@@ -620,7 +620,7 @@ sub length {
# Mixed strand values means transplicing (where exons can even
# be in different chromosomes), so in that case only give the sum
# of the lengths of the individual segments
- if ($self->guide_strand == undef) {
+ if (! defined $self->guide_strand) {
for my $loc ( $self->sub_Location(0) ) {
$length += abs($loc->end - $loc->start) + 1
}

0 comments on commit cc7458e

Please sign in to comment.