diff options
author | levine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-06-09 20:13:20 +0000 |
---|---|---|
committer | levine <levine@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-06-09 20:13:20 +0000 |
commit | 578a397d9a38b8e6cb3ecfc102eb43ef609aa6a7 (patch) | |
tree | 5f8b528cf7e4868a05683c79b3af3a4f4462533c /bin | |
parent | a428e11aa5bffc7e4841d08f301e43fb3398c839 (diff) | |
download | ATCD-578a397d9a38b8e6cb3ecfc102eb43ef609aa6a7.tar.gz |
create version diffs, in background
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/make_release | 35 |
1 files changed, 34 insertions, 1 deletions
diff --git a/bin/make_release b/bin/make_release index 869f3c28bc8..371d8f2292b 100755 --- a/bin/make_release +++ b/bin/make_release @@ -132,13 +132,14 @@ umask 022; ######## if ($update_versions && "$kit" ne 'ace+tao') { $major_version = $minor_version = $beta_version = 0; - $version = ''; + $previous_version = $version = ''; &check_workspace () || &get_versions () || &update_version_files () || &update_changelog () || &tag () || + &diff () || &create_kit (); } else { &create_kit (); @@ -203,6 +204,14 @@ sub get_versions () { close VERSION; if ($release_type eq 'beta') { + if ($beta_version > 0) { + $previous_version = "$major_version.$minor_version.$beta_version"; + } elsif ($minor_version > 0) { + $previous_version = "$major_version.$minor_version"; + } else { + $previous_version = "$major_version"; + } + ++$beta_version; $version = "$major_version.$minor_version.$beta_version"; } elsif ($release_type eq 'minor' ) { @@ -297,6 +306,30 @@ sub tag () { } ######## +######## If building a beta, create a diff from the previos version. +######## +sub diff () { + if ("$previous_version") { + #### Only create a diff for a beta version. + + my $previous_tag = "$KIT-$previous_version"; + my $tag = "$KIT-$version"; + + #### cvs tag does not allow dots. + $previous_tag =~ tr/./_/; + $tag =~ tr/./_/; + + my $module = $kit eq 'ace' ? 'ACE_wrappers' : 'ACE_wrappers/TAO'; + + system ("$cvs -q rdiff -u -r $previous_tag -r $tag $module | " . + "$gzip -9 > diffs/$previous_tag-$tag.diff.gz &"); + } + + #### Ignore return value. No promises on diffs. + 0; +} + +######## ######## Create the tar file(s) and move to their proper location. ######## sub create_kit () { |