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

Diff of /FigWebServices/get_dlits.cgi

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

revision 1.4, Sat Jun 28 20:56:11 2008 UTC revision 1.5, Fri Jul 4 17:36:04 2008 UTC
# Line 245  Line 245 
245          my($status,$peg,$pubmed) = @$tuple;          my($status,$peg,$pubmed) = @$tuple;
246          next if (! $fig->is_real_feature($peg));          next if (! $fig->is_real_feature($peg));
247          my $gs = $fig->genus_species(&FIG::genome_of($peg));          my $gs = $fig->genus_species(&FIG::genome_of($peg));
248          $gs =~ s/^(\S+)\s+(\S+).*$/$1/;          $gs =~ s/^(\S+\s+\S+).*$/$1/;
249          my $title = &title_of($fig,$pubmed);          my $title = &title_of($fig,$pubmed);
250          my $func = $fig->function_of($peg);          my $func = $fig->function_of($peg);
251          my @codes = $cgi->radio_group(-name => "tuple:$peg:$pubmed:$status",          my @codes = $cgi->radio_group(-name => "tuple:$peg:$pubmed:$status",

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3