[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.2, Tue May 11 21:36:52 2004 UTC revision 1.3, Thu Jun 3 16:30:40 2004 UTC
# Line 4  Line 4 
4  use FIG;  use FIG;
5  my $fig = new FIG;  my $fig = new FIG;
6    
7  $usage = "usage: sync_new_system AssignmentsPackage AnnotationsPackage TranslationRulesPackage SubsystemsPackage";  $usage = "usage: sync_new_system Dir";
   
8  (  (
9   ($assignments_package = shift @ARGV) &&   ($dir = shift @ARGV) && (-d $dir)
  ($annotations_package = shift @ARGV) &&  
  ($trans_rules_package = shift @ARGV) &&  
  ($subsys_package      = shift @ARGV)  
10  )  )
11      || die $usage;      || die $usage;
12    
13    my $assignments_package = "$dir/assignments_package";
14    my $annotations_package = "$dir/annotations_package";
15    my $trans_rules_package = "$dir/trans_rules_package";
16    my $subsys_package      = "$dir/subsys_package";
17    
18  &FIG::run("$FIG_Config::bin/install_assignments $assignments_package");  &FIG::run("$FIG_Config::bin/install_assignments $assignments_package");
19  &FIG::run("$FIG_Config::bin/install_annotations $annotations_package");  &FIG::run("$FIG_Config::bin/install_annotations $annotations_package");
20  &FIG::run("$FIG_Config::bin/install_translation_rules update $trans_rules_package");  &FIG::run("$FIG_Config::bin/install_translation_rules update $trans_rules_package");

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3