Parent Directory
| 
Revision Log
Revision 1.5 - (view) (download) (as text)
| 1 : | overbeek | 1.2 | use P2Pupdate; |
| 2 : | |||
| 3 : | overbeek | 1.1 | use FIG; |
| 4 : | my $fig = new FIG; | ||
| 5 : | |||
| 6 : | overbeek | 1.4 | ( |
| 7 : | overbeek | 1.1 | ($sync_from_date = shift @ARGV) && |
| 8 : | overbeek | 1.4 | ($dir = shift @ARGV) |
| 9 : | overbeek | 1.1 | ) |
| 10 : | overbeek | 1.4 | || die "usage: usage: extract_data_for_syncing_after_update SyncFromDate(MM/DD/YYYY) Dir"; |
| 11 : | (! -d $dir) || die "$dir already exists"; | ||
| 12 : | mkdir($dir,0777) || die "could not make $dir"; | ||
| 13 : | overbeek | 1.5 | $assignments_package = "$dir/assignments_package"; |
| 14 : | $annotations_package = "$dir/annotations_package"; | ||
| 15 : | $trans_rules_package = "$dir/trans_rules_package"; | ||
| 16 : | $subsys_package = "$dir/subsys_package"; | ||
| 17 : | overbeek | 1.1 | |
| 18 : | overbeek | 1.2 | &P2Pupdate::package_translation_rules($FIG_Config::fig,$trans_rules_package); |
| 19 : | overbeek | 1.1 | &P2Pupdate::package_subsystems($fig,$subsys_package,0); |
| 20 : | |||
| 21 : | overbeek | 1.3 | my(@genomes) = $fig->genomes; |
| 22 : | overbeek | 1.1 | &P2Pupdate::package_assignments($fig,"master","master",$sync_from_date,\@genomes,$assignments_package); |
| 23 : | overbeek | 1.3 | &P2Pupdate::package_annotations($fig,"master",$sync_from_date,\@genomes,$annotations_package); |
| 24 : | overbeek | 1.1 |
| MCS Webmaster | ViewVC Help |
| Powered by ViewVC 1.0.3 |