[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.17, Thu Sep 29 18:59:01 2005 UTC revision 1.18, Wed Oct 5 20:34:02 2005 UTC
# Line 878  Line 878 
878      my($self, $fh, $first_line) = @_;      my($self, $fh, $first_line) = @_;
879      my($cur, $cur_id);      my($cur, $cur_id);
880    
881      for ($_ = $first_line; $_;  $_ = <$fh>, chomp)      for ($_ = $first_line; defined($_);  $_ = <$fh>, chomp)
882      {      {
883          if (/^>\s*(\S+)/)          if (/^>\s*(\S+)/)
884          {          {

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3