diff --git a/modules/Bio/EnsEMBL/DBSQL/BaseAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/BaseAdaptor.pm index 72ac4125ef9a27598ef9c232f9d3d815c4b159cb..ea86076702edd860aea3d611b7ba049ab98e1afe 100755 --- a/modules/Bio/EnsEMBL/DBSQL/BaseAdaptor.pm +++ b/modules/Bio/EnsEMBL/DBSQL/BaseAdaptor.pm @@ -674,7 +674,7 @@ sub _uncached_fetch_by_dbID{ #Should only be one my ($feat) = @{$self->generic_fetch($constraint)}; - return undef if(!$feat); + return if(!$feat); return $feat; } @@ -1151,7 +1151,7 @@ sub _logic_name_to_constraint { my $an = $aa->fetch_by_logic_name($logic_name); if ( !defined($an) ) { - return undef; + return; } my $an_id = $an->dbID(); diff --git a/modules/Bio/EnsEMBL/DBSQL/SliceAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/SliceAdaptor.pm index 3b81e5b05cff9b36a3f3b6fe21cecbaa80411913..c3fda732c072794a59dcd42fa8c077c4ac52d3e6 100644 --- a/modules/Bio/EnsEMBL/DBSQL/SliceAdaptor.pm +++ b/modules/Bio/EnsEMBL/DBSQL/SliceAdaptor.pm @@ -322,7 +322,7 @@ sub fetch_by_region { $syn_sql_sth->finish; - if ($no_fuzz) { return undef } + if ($no_fuzz) { return; } # Do fuzzy matching, assuming that we are just missing a version # on the end of the seq_region name. @@ -398,7 +398,7 @@ sub fetch_by_region { $cs = $high_cs; # return if we did not find any appropriate match: - if ( !defined($high_ver) ) { return undef } + if ( !defined($high_ver) ) { return; } } else {