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

Diff of /FigKernelPackages/FIG.pm

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

revision 1.45, Mon Mar 22 01:51:30 2004 UTC revision 1.46, Mon Mar 22 02:33:57 2004 UTC
# Line 721  Line 721 
721  sub read_fasta_record  sub read_fasta_record
722  {  {
723      my ($file_handle) = @_;      my ($file_handle) = @_;
724      my ( $old_end_of_record, $fasta_record, @lines, $head, $sequence, @parsed_fasta_record );      my ( $old_end_of_record, $fasta_record, @lines, $head, $sequence, $seq_id, $comment, @parsed_fasta_record );
725    
726      if (not defined($file_handle))  { $file_handle = \*STDIN; }      if (not defined($file_handle))  { $file_handle = \*STDIN; }
727    

Legend:
Removed from v.1.45  
changed lines
  Added in v.1.46

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3