[Bio] / FigKernelScripts / sync_new_system.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/sync_new_system.pl

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

revision 1.3, Thu Jun 3 16:30:40 2004 UTC revision 1.4, Sun Jul 25 21:48:15 2004 UTC
# Line 1  Line 1 
   
 use P2Pupdate;  
   
1  use FIG;  use FIG;
 my $fig = new FIG;  
2    
3  $usage = "usage: sync_new_system Dir";  $usage = "usage: sync_new_system Dir MakeAssignments";
4  (  (
5   ($dir = shift @ARGV) && (-d $dir)   ($dir = shift @ARGV) && (-d $dir)
6  )  )
7      || die $usage;      || die $usage;
8    
9    my $make_assignments = (@ARGV > 0) ? $ARGV[0] : "";
10    
11  my $assignments_package = "$dir/assignments_package";  my $assignments_package = "$dir/assignments_package";
12  my $annotations_package = "$dir/annotations_package";  my $annotations_package = "$dir/annotations_package";
13  my $trans_rules_package = "$dir/trans_rules_package";  my $trans_rules_package = "$dir/trans_rules_package";
14  my $subsys_package      = "$dir/subsys_package";  my $subsys_package      = "$dir/subsys_package";
15    
16  &FIG::run("$FIG_Config::bin/install_assignments $assignments_package");  &FIG::run("$FIG_Config::bin/install_assignments $assignments_package $make_assignments");
17  &FIG::run("$FIG_Config::bin/install_annotations $annotations_package");  &FIG::run("$FIG_Config::bin/install_annotations $annotations_package");
18  &FIG::run("$FIG_Config::bin/install_translation_rules update $trans_rules_package");  &FIG::run("$FIG_Config::bin/install_translation_rules update $trans_rules_package");
19  &FIG::run("$FIG_Config::bin/install_subsystems $subsys_package");  &FIG::run("$FIG_Config::bin/install_subsystems $subsys_package");

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3