[Bio] / FigWebServices / protein.cgi Repository:
ViewVC logotype

Diff of /FigWebServices/protein.cgi

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

revision 1.227, Thu Aug 3 05:27:30 2006 UTC revision 1.228, Thu Aug 3 22:18:50 2006 UTC
# Line 98  Line 98 
98    
99          # Get the PEG.          # Get the PEG.
100          my $pegID = $cgi->param('prot');          my $pegID = $cgi->param('prot');
101            if ($pegID !~ /^fig\|/) {
102                my @poss = $fig->by_alias($pegID);
103    
104                if (@poss > 0) {
105                    $pegID = $poss[0];
106                }
107            }
108    
109          my $parameters = { fig_object  => $fig,          my $parameters = { fig_object  => $fig,
110                             peg_id      => $pegID,                             peg_id      => $pegID,

Legend:
Removed from v.1.227  
changed lines
  Added in v.1.228

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3