Commit 93da7196 authored by Leo Gordon's avatar Leo Gordon
Browse files

let Job.input_id stringify itself

parent 7ab1f0cb
...@@ -40,7 +40,7 @@ use strict; ...@@ -40,7 +40,7 @@ use strict;
use Bio::EnsEMBL::Utils::Argument ('rearrange'); use Bio::EnsEMBL::Utils::Argument ('rearrange');
use Bio::EnsEMBL::Hive::Utils ('destringify'); use Bio::EnsEMBL::Hive::Utils ('stringify', 'destringify');
use Bio::EnsEMBL::Hive::DBSQL::AnalysisJobAdaptor; use Bio::EnsEMBL::Hive::DBSQL::AnalysisJobAdaptor;
use Bio::EnsEMBL::Hive::DBSQL::DataflowRuleAdaptor; use Bio::EnsEMBL::Hive::DBSQL::DataflowRuleAdaptor;
...@@ -89,7 +89,11 @@ sub analysis_id { ...@@ -89,7 +89,11 @@ sub analysis_id {
sub input_id { sub input_id {
my $self = shift; my $self = shift;
$self->{'_input_id'} = shift if(@_); if(@_) {
my $input_id = shift @_;
$self->{'_input_id'} = ref($input_id) ? stringify($input_id) : $input_id;
}
return $self->{'_input_id'}; return $self->{'_input_id'};
} }
......
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