[Bioperl-l] desc in fasqta names

[Gilles Parmentier]

Hello all,

I'm using SeqIO to transform a genbank file in a fasta file. I don't 
want to have the result of a desc call in the fasta name, how can I do 
that ? My problem seems to come from those lines in SeqIO/fasta.pm 
(write_seq) :

        if ($seq->can('desc') and my $desc = $seq->desc()) {
            $desc =~ s/\n//g;
            $top .= " $desc";
        }

How can I turn this feature off ?

Thanks in advance for your help,

Gilles