Skip to content
Snippets Groups Projects
Commit 6be1419c authored by Leo Gordon's avatar Leo Gordon
Browse files

throw should be inheritable, so let us use the $self->throw syntax

parent f7ae91b3
No related branches found
No related tags found
No related merge requests found
......@@ -86,9 +86,11 @@ package Bio::EnsEMBL::Hive::Process;
use strict;
use Bio::EnsEMBL::Utils::Argument;
use Bio::EnsEMBL::Utils::Exception qw(throw warning); # provide these methods for deriving classes
use Bio::EnsEMBL::Utils::Exception qw(throw warning);
use Bio::EnsEMBL::Hive::AnalysisJob;
use base ('Bio::EnsEMBL::Utils::Exception'); # provide these methods for deriving classes
sub new {
my ($class,@args) = @_;
my $self = bless {}, $class;
......@@ -431,7 +433,7 @@ sub runnable {
if ($arg->isa("Bio::EnsEMBL::Analysis::Runnable")) {
push(@{$self->{'runnable'}},$arg);
} else {
&throw("[$arg] is not a Bio::EnsEMBL::Analysis::Runnable");
throw("[$arg] is not a Bio::EnsEMBL::Analysis::Runnable");
}
}
return $self->{'runnable'};
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment