Commit 9270ced7 authored by Jessica Severin's avatar Jessica Severin
Browse files

added methods analysis_job_id and debug to both Pipeline::RunnableDB

and Analysis::RunnableDB superclasses
parent 7fe49577
......@@ -237,6 +237,21 @@ sub Bio::EnsEMBL::Pipeline::RunnableDB::branch_code
return $self->{'_branch_code'};
}
sub Bio::EnsEMBL::Pipeline::RunnableDB::analysis_job_id
{
my $self = shift;
$self->{'_analysis_job_id'} = shift if(@_);
$self->{'_analysis_job_id'}=0 unless($self->{'_analysis_job_id'});
return $self->{'_analysis_job_id'};
}
sub Bio::EnsEMBL::Pipeline::RunnableDB::debug {
my $self = shift;
$self->{'_debug'} = shift if(@_);
$self->{'_debug'}=0 unless(defined($self->{'_debug'}));
return $self->{'_debug'};
}
#######################################
# extensions to
# Bio::EnsEMBL::Analysis::RunnableDB
......@@ -262,6 +277,21 @@ sub Bio::EnsEMBL::Analysis::RunnableDB::branch_code
return $self->{'_branch_code'};
}
sub Bio::EnsEMBL::Analysis::RunnableDB::analysis_job_id
{
my $self = shift;
$self->{'_analysis_job_id'} = shift if(@_);
$self->{'_analysis_job_id'}=0 unless($self->{'_analysis_job_id'});
return $self->{'_analysis_job_id'};
}
sub Bio::EnsEMBL::Analysis::RunnableDB::debug {
my $self = shift;
$self->{'_debug'} = shift if(@_);
$self->{'_debug'}=0 unless(defined($self->{'_debug'}));
return $self->{'_debug'};
}
#######################################
# top level functions
#######################################
......
Markdown is supported
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