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

Diff of /FigKernelPackages/gjogenbank.pm

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

revision 1.9, Fri Apr 1 18:53:31 2011 UTC revision 1.10, Fri Aug 26 17:00:42 2011 UTC
# Line 677  Line 677 
677          $ref{ ref_note } = $1 if $line =~ /\s*\d+\s+\((.*)\)\s*$/;          $ref{ ref_note } = $1 if $line =~ /\s*\d+\s+\((.*)\)\s*$/;
678      }      }
679    
680        local $_;
681      if ( defined( $_ = <$fh> ) ) { chomp } else { $state = -1 }      if ( defined( $_ = <$fh> ) ) { chomp } else { $state = -1 }
682    
683      my ( $tag, $value );      my ( $tag, $value );

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3