Changeset 7621
- Timestamp:
- 2004-06-18T14:53:48+12:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/bin/script/create_distributions.pl
r7612 r7621 130 130 chdir ($ENV{'GSDLHOME'}); 131 131 print STDERR "\ntagging gsdl with $cvs_tag\n"; 132 `cvs tag -F $cvs_tag`;132 # `cvs tag -F $cvs_tag`; 133 133 134 134 # Tag gli repository 135 135 chdir (&util::filename_cat($ENV{'GSDLHOME'}, "gli")); 136 136 print STDERR "\ntagging gli with $cvs_tag\n"; 137 `cvs tag -F $cvs_tag`;137 # `cvs tag -F $cvs_tag`; 138 138 } 139 139 … … 173 173 &edit_files(); 174 174 175 #&create_windows_distribution();176 #&create_unix_distribution();177 #&create_source_distribution();175 &create_windows_distribution(); 176 &create_unix_distribution(); 177 &create_source_distribution(); 178 178 &create_cdrom_distribution() unless $no_cdrom; 179 179 } … … 254 254 &install_unix_specific ($unix_dist_dir); 255 255 256 # Make sure all configure scripts are executable 257 `cd $unix_dist_dir; pwd; find -name "configure" -exec chmod a+x {} \\;`; 258 256 259 # we want to include the unbuilt bits of the demo collection too 257 260 my $demodir = &util::filename_cat($unix_dist_dir, "gsdl", "collect", "demo"); … … 292 295 &install_only_core_language_macros(&util::filename_cat($tmpdir, "gsdl", "macros"), $gsdlmacrosdir); 293 296 294 # We don't want the compiled GLI classes in the source distribution 297 # We don't want the compiled GLI classes in the source distribution (or the GS3 script) 295 298 &util::rm(&util::filename_cat($source_dist_dir, "gsdl", "gli", "GLI.jar")); 299 &util::rm(&util::filename_cat($source_dist_dir, "gsdl", "gli", "gli4gs3.sh")); 300 301 # Make sure there is a dictionary_en.properties to prevent GLI problems 302 &util::cp(&util::filename_cat($source_dist_dir, "gsdl", "gli", "classes", "dictionary.properties"), 303 &util::filename_cat($source_dist_dir, "gsdl", "gli", "classes", "dictionary_en.properties")); 296 304 297 305 # (We don't include the built demo collection in the source distribution) … … 508 516 &util::cp_r($source_dir, $target_dir); 509 517 518 my $gli_dir = &util::filename_cat($target_dir, "gli"); 519 510 520 # Make Unix scripts executable 511 my $clean_sh = &util::filename_cat($ target_dir, "gli", "clean.sh");521 my $clean_sh = &util::filename_cat($gli_dir, "clean.sh"); 512 522 `chmod a+x $clean_sh`; 513 my $document_sh = &util::filename_cat($ target_dir, "gli", "document.sh");523 my $document_sh = &util::filename_cat($gli_dir, "document.sh"); 514 524 `chmod a+x $document_sh`; 515 my $gli_sh = &util::filename_cat($ target_dir, "gli", "gli.sh");525 my $gli_sh = &util::filename_cat($gli_dir, "gli.sh"); 516 526 `chmod a+x $gli_sh`; 517 my $makegli_sh = &util::filename_cat($ target_dir, "gli", "makegli.sh");527 my $makegli_sh = &util::filename_cat($gli_dir, "makegli.sh"); 518 528 `chmod a+x $makegli_sh`; 519 529 530 # Make sure there is a dictionary_en.properties to prevent GLI problems 531 &util::cp(&util::filename_cat($gli_dir, "classes", "dictionary.properties"), 532 &util::filename_cat($gli_dir, "classes", "dictionary_en.properties")); 533 520 534 # Remove unwanted stuff - all distributions 521 &util::rm_r(&util::filename_cat($target_dir, "gli", "buglist")); 522 &util::rm_r(&util::filename_cat($target_dir, "gli", "prototype")); 535 &util::rm_r(&util::filename_cat($gli_dir, "buglist")); 536 &util::rm_r(&util::filename_cat($gli_dir, "prototype")); 537 538 # Don't need Greenstone 3 script 539 &util::rm(&util::filename_cat($gli_dir, "gli4gs3.sh")); 523 540 524 541 # Remove unwanted stuff - Unix distributions 525 542 if ($type eq "unix") { 526 543 # Don't need Windows scripts 527 &util::rm(&util::filename_cat($ target_dir, "gli", "clean.bat"));528 &util::rm(&util::filename_cat($ target_dir, "gli", "document.bat"));529 &util::rm(&util::filename_cat($ target_dir, "gli", "gli.bat"));530 &util::rm(&util::filename_cat($ target_dir, "gli", "makegli.bat"));544 &util::rm(&util::filename_cat($gli_dir, "clean.bat")); 545 &util::rm(&util::filename_cat($gli_dir, "document.bat")); 546 &util::rm(&util::filename_cat($gli_dir, "gli.bat")); 547 &util::rm(&util::filename_cat($gli_dir, "makegli.bat")); 531 548 532 549 # Don't need Windows utilities 533 &util::rm_r(&util::filename_cat($ target_dir, "gli", "winutil"));550 &util::rm_r(&util::filename_cat($gli_dir, "winutil")); 534 551 535 552 # Don't need Windows README file 536 &util::rm(&util::filename_cat($ target_dir, "gli", "READMEru.txt-cp1251"));553 &util::rm(&util::filename_cat($gli_dir, "READMEru.txt-cp1251")); 537 554 538 555 # Rename Unix README file 539 &util::cp(&util::filename_cat($ target_dir, "gli", "READMEru.txt-koi8-r"),540 &util::filename_cat($ target_dir, "gli", "READMEru.txt"));541 &util::rm(&util::filename_cat($ target_dir, "gli", "READMEru.txt-koi8-r"));556 &util::cp(&util::filename_cat($gli_dir, "READMEru.txt-koi8-r"), 557 &util::filename_cat($gli_dir, "READMEru.txt")); 558 &util::rm(&util::filename_cat($gli_dir, "READMEru.txt-koi8-r")); 542 559 } 543 560 … … 545 562 if ($type eq "windows") { 546 563 # Don't need Unix scripts 547 &util::rm(&util::filename_cat($ target_dir, "gli", "clean.sh"));548 &util::rm(&util::filename_cat($ target_dir, "gli", "document.sh"));549 &util::rm(&util::filename_cat($ target_dir, "gli", "gli.sh"));550 &util::rm(&util::filename_cat($ target_dir, "gli", "makegli.sh"));564 &util::rm(&util::filename_cat($gli_dir, "clean.sh")); 565 &util::rm(&util::filename_cat($gli_dir, "document.sh")); 566 &util::rm(&util::filename_cat($gli_dir, "gli.sh")); 567 &util::rm(&util::filename_cat($gli_dir, "makegli.sh")); 551 568 } 552 569 }
Note:
See TracChangeset
for help on using the changeset viewer.