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

Diff of /FigKernelPackages/representative_sequences.pm

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

revision 1.3, Mon Feb 19 14:43:57 2007 UTC revision 1.4, Wed Feb 28 21:55:44 2007 UTC
# Line 834  Line 834 
834  sub make_blast_db  sub make_blast_db
835  {   my ( $db, $seqs, $protein ) =  @_;  {   my ( $db, $seqs, $protein ) =  @_;
836    
     if (! $protein) { confess 'BAD' }  
837      open FH, ">$db" or die "Could not create blast database file \"$db\"";      open FH, ">$db" or die "Could not create blast database file \"$db\"";
838      foreach ( @$seqs )      foreach ( @$seqs )
839      {      {

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3