[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.179, Tue Nov 2 14:45:31 2004 UTC revision 1.180, Wed Nov 3 17:46:17 2004 UTC
# Line 1626  Line 1626 
1626      return @genomes;      return @genomes;
1627  }  }
1628    
1629    sub is_complete {
1630        my($self,$genome) = @_;
1631    
1632        my $rdbH = $self->db_handle;
1633        my $relational_db_response = $rdbH->SQL("SELECT genome  FROM genome where (genome = '$genome') AND (complete = '1')");
1634        return (@$relational_db_response == 1)
1635        }
1636    
1637  sub genome_counts {  sub genome_counts {
1638      my($self,$complete) = @_;      my($self,$complete) = @_;

Legend:
Removed from v.1.179  
changed lines
  Added in v.1.180

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3