[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.26, Mon Jan 26 22:51:32 2004 UTC revision 1.27, Tue Feb 3 16:45:57 2004 UTC
# Line 1604  Line 1604 
1604      return (($x < 300) || ($x > ($self->contig_ln($genome,$contig) - 300)));      return (($x < 300) || ($x > ($self->contig_ln($genome,$contig) - 300)));
1605  }  }
1606    
1607    sub is_real_feature {
1608        my($self,$fid) = @_;
1609        my($relational_db_response);
1610    
1611        my $rdbH = $self->db_handle;
1612        return (($relational_db_response = $rdbH->SQL("SELECT id FROM features WHERE ( id = \'$fid\' )")) &&
1613                (@$relational_db_response == 1));
1614    }
1615    
1616  ################ Routines to process functional coupling for PEGs  ##########################  ################ Routines to process functional coupling for PEGs  ##########################
1617    
1618  =pod  =pod

Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3