[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.377, Wed Oct 12 21:03:16 2005 UTC revision 1.378, Thu Oct 13 20:13:48 2005 UTC
# Line 5777  Line 5777 
5777      }      }
5778      if (not exists($query_cache->{q2}))      if (not exists($query_cache->{q2}))
5779      {      {
5780          $query_cache->{q2} = $dbh->prepare(qq(SELECT syn_id,syn_ln,maps_to_ln          #
5781            # Select distinct to work around the duplicate-rows bug in build_nr.
5782            #
5783            $query_cache->{q2} = $dbh->prepare(qq(SELECT distinct syn_id,syn_ln,maps_to_ln
5784                                                FROM peg_synonyms                                                FROM peg_synonyms
5785                                                WHERE maps_to = ?));                                                WHERE maps_to = ?));
5786      }      }
# Line 5793  Line 5796 
5796      my $relational_db_response = $q1_sth->fetchall_arrayref();      my $relational_db_response = $q1_sth->fetchall_arrayref();
5797  #    my $relational_db_response = $rdbH->SQL("SELECT maps_to FROM peg_synonyms WHERE  syn_id = \'$id\' ");  #    my $relational_db_response = $rdbH->SQL("SELECT maps_to FROM peg_synonyms WHERE  syn_id = \'$id\' ");
5798    
5799      if ($relational_db_response && (@$relational_db_response == 1))      if ($relational_db_response && (@$relational_db_response))
5800      {      {
5801          $id = $relational_db_response->[0]->[0];          $id = $relational_db_response->[0]->[0];
5802            #
5803            # if we have more than one, we have duplicate lines. Warn and let it still work.
5804            #
5805            if (@$relational_db_response > 1)
5806            {
5807                warn "Duplicates found in peg_synonyms for syn_id $id\n";
5808            }
5809      }      }
5810    
5811      #      #

Legend:
Removed from v.1.377  
changed lines
  Added in v.1.378

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3