[Bio] / FigKernelPackages / CompareMR.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/CompareMR.pm

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

revision 1.2, Mon Mar 12 01:13:23 2007 UTC revision 1.3, Wed May 9 15:54:29 2007 UTC
# Line 28  Line 28 
28  use FIGV;  use FIGV;
29    
30  sub compare_genomes_MR {  sub compare_genomes_MR {
31      my($arg1,$genome2) = @_;      my($arg1,$genome2, $fig_services, $genome1) = @_;
   
     my($fig_services,$genome1);  
32    
33        unless ($fig_services) {
34      if (-d "$FIG_Config::organisms/$arg1")      if (-d "$FIG_Config::organisms/$arg1")
35      {      {
36          $fig_services = $fig;          $fig_services = $fig;
# Line 57  Line 56 
56              die "Invalid first argument;  $arg1";              die "Invalid first argument;  $arg1";
57          }          }
58      }      }
59        }
60    
61      my $data1 = &data_on_subs_roles_pegs($fig_services,$genome1);      my $data1 = &data_on_subs_roles_pegs($fig_services,$genome1);
62      my $data2 = &data_on_subs_roles_pegs($fig_services,$genome2);      my $data2 = &data_on_subs_roles_pegs($fig_services,$genome2);

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3