[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.193, Mon Jan 3 02:21:08 2005 UTC revision 1.194, Mon Jan 3 02:23:12 2005 UTC
# Line 2857  Line 2857 
2857      if (($relational_db_response = $rdbH->SQL("SELECT id FROM ext_alias WHERE ( alias = \'$alias\' )")) &&      if (($relational_db_response = $rdbH->SQL("SELECT id FROM ext_alias WHERE ( alias = \'$alias\' )")) &&
2858          (@$relational_db_response > 0))          (@$relational_db_response > 0))
2859      {      {
         @pegs = map { $_->[0] } @$relational_db_response;  
2860          if (@$relational_db_response == 1)          if (@$relational_db_response == 1)
2861          {          {
2862              $peg = $relational_db_response->[0]->[0];              $peg = $relational_db_response->[0]->[0];

Legend:
Removed from v.1.193  
changed lines
  Added in v.1.194

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3