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

Diff of /FigWebServices/att2sub.cgi

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

revision 1.2, Sun Jul 24 19:20:06 2005 UTC revision 1.6, Mon Dec 5 19:12:11 2005 UTC
# Line 1  Line 1 
1    #
2    # Copyright (c) 2003-2006 University of Chicago and Fellowship
3    # for Interpretations of Genomes. All Rights Reserved.
4    #
5    # This file is part of the SEED Toolkit.
6    #
7    # The SEED Toolkit is free software. You can redistribute
8    # it and/or modify it under the terms of the SEED Toolkit
9    # Public License.
10    #
11    # You should have received a copy of the SEED Toolkit Public License
12    # along with this program; if not write to the University of Chicago
13    # at info@ci.uchicago.edu or the Fellowship for Interpretation of
14    # Genomes at veronika@thefig.info or download a copy from
15    # http://www.theseed.org/LICENSE.TXT.
16    #
17    
18  use FIG;  use FIG;
19  my $fig = new FIG;  my $fig = new FIG;
20  use HTML;  use HTML;
# Line 39  Line 56 
56          }          }
57          my @list = keys(%list_of_ss);          my @list = keys(%list_of_ss);
58    
59          my $prefix = "$FIG_Config::cgi_url"."subsys.cgi?user=&ssa_name=";          my $prefix = &FIG::cgi_url(-relative => 1) . "/subsys.cgi?user=&ssa_name=";
60          my $suffix = "&request=show_ssa";          my $suffix = "&request=show_ssa";
61          push(@$html,"<TABLE>");          push(@$html,"<TABLE>");
62          foreach my $s (@list)          foreach my $s (@list)
# Line 66  Line 83 
83  my @genomes = $fig->genomes('complete');  my @genomes = $fig->genomes('complete');
84  foreach $g (@genomes){  foreach $g (@genomes){
85          my $gs = $fig->genus_species($g);          my $gs = $fig->genus_species($g);
86          push(@gs_list, $g.", ".$gs);          push(@gs_list, $gs.", ".$g);
87  }  }
88    
89  @gs_list2 =sort {uc($a) cmp uc($b)} @gs_list;  @gs_list2 =sort {uc($a) cmp uc($b)} @gs_list;

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.6

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3