[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.154, Thu Sep 15 20:45:22 2005 UTC revision 1.155, Sun Sep 18 01:20:28 2005 UTC
# Line 924  Line 924 
924              my %opts = (SPROUT => $sprout,              my %opts = (SPROUT => $sprout,
925                          user => $user,                          user => $user,
926                          ssa_name => $esc_sub,                          ssa_name => $esc_sub,
927                          request => 'show_ssa',  #                       request => 'show_ssa',
928                          show_clusters => 1,  #                       show_clusters => 1,
929                          sort => 'by_phylo'                          sort => 'by_phylo'
930                          );                          );
931    
# Line 937  Line 937 
937              my $opts = join("&", map { "$_=$opts{$_}" } keys(%opts));              my $opts = join("&", map { "$_=$opts{$_}" } keys(%opts));
938    
939  #            my $url = $cgi->a({href => "subsys.cgi?${can_alter}SPROUT=$sprout&user=$user&ssa_name=$esc_sub&request=show_ssa&show_clusters=1&sort=by_phylo"}, $sub);  #            my $url = $cgi->a({href => "subsys.cgi?${can_alter}SPROUT=$sprout&user=$user&ssa_name=$esc_sub&request=show_ssa&show_clusters=1&sort=by_phylo"}, $sub);
940              my $url = $cgi->a({href => "subsys.cgi?$opts"}, $sub);              my $url = $cgi->a({href => "display_subsys.cgi?$opts"}, $sub);
941    
942              push(@table, [$url, $curator, $role]);              push(@table, [$url, $curator, $role]);
943          }          }

Legend:
Removed from v.1.154  
changed lines
  Added in v.1.155

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3