Skip to content
Snippets Groups Projects
Commit 33bd4df2 authored by Andy Yates's avatar Andy Yates
Browse files

Header function should not be responsbile for the addition of a > for the...

Header function should not be responsbile for the addition of a > for the FASTA header. That's the serailisers responsiblity
parent 201a6c1e
No related branches found
No related tags found
No related merge requests found
......@@ -107,12 +107,12 @@ sub new {
my $idtype = $slice->coord_system->name;
my $location = $slice->name;
return ">$id $seqtype:$idtype $location";
return "$id $seqtype:$idtype $location";
}
else {
# must be a Bio::Seq , or we're doomed
return ">".$slice->display_id;
return $slice->display_id;
}
};
......@@ -135,8 +135,8 @@ sub print_metadata {
my $slice = shift;
my $fh = $self->{'filehandle'};
my $function = $self->{'header_function'};
my $metadata = &$function($slice);
print $fh $metadata."\n";
my $metadata = $function->($slice);
print $fh '>'.$metadata."\n";
}
=head2 print_Seq
......
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