[Bio] / FigKernelPackages / FigGFF.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/FigGFF.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7, Sat Apr 9 21:04:48 2005 UTC revision 1.8, Sat Apr 9 21:09:30 2005 UTC
# Line 1046  Line 1046 
1046  sub fasta_data  sub fasta_data
1047  {  {
1048      my($self, $id, $data) = @_;      my($self, $id, $data) = @_;
   
 print "Fasta data for $id\n";  
   
1049      $id && $data && ($self->{fasta_data}->{$id} = $data);      $id && $data && ($self->{fasta_data}->{$id} = $data);
1050      $id && return $self->{fasta_data}->{$id};      $id && return $self->{fasta_data}->{$id};
1051      return $self->{fasta_data};      return $self->{fasta_data};

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3