rx: OPENAFS-SA-2015-007 "Tattletale"

[openafs.git] / build-tools / make-release

diff --git a/build-tools/make-release b/build-tools/make-release
index 32b575a..a8ba7ba 100755 (executable)
--- a/build-tools/make-release
+++ b/build-tools/make-release
@@ -79,7 +79,7 @@ File::Path::rmtree("$tempDir/$name/doc");
 
 # Create the source tarball (both .gz and .bz2)
 system("tar -cf $outDir/$name-src.tar -C $tempDir $name") == 0
-    or die "Unable to create documentation tarball : $!";
+    or die "Unable to create source code tarball : $!";
 push @toCompress, "$outDir/$name-src.tar";
 
 # Construct the diffs, and zip them
@@ -89,9 +89,10 @@ if ($last) {
     push @toCompress, "$outDir/$name.diff";
 }
 
-my @toMD5 = @toCompress;
+my @toMD5;
 
-# Compress everything that needs squashing 
+# Compress everything that needs squashing,
+# and also set up a list for md5 checksumming.
 foreach my $file (@toCompress) {
     system("gzip < $file > $file.gz") == 0
        or die "Unable to create gzip file of '$file' : $!";
@@ -100,6 +101,14 @@ foreach my $file (@toCompress) {
     system("bzip2 < $file > $file.bz2") == 0
        or die "Unable to create bzip file of '$file' : $!";
     push @toMD5, "$file.bz2";
+
+    # Delete the uncompressed tar files.
+    if ($file =~ /\.tar$/) {
+      unlink($file);
+    } else {
+      # Otherwise, queue this file for md5 checksumming.
+      push @toMD5, $file;
+    }
 }
 
 foreach my $file (@toMD5) {