From: Ken Dreyer Date: Wed, 31 Jul 2013 22:16:16 +0000 (-0600) Subject: enable Perl's strict and warnings in make-release X-Git-Tag: upstream/1.8.0_pre1^2~1053 X-Git-Url: https://git.michaelhowe.org/gitweb/?a=commitdiff_plain;h=cd0cac7e1aa673de459c3ef29404e43a1ddccbe1;p=packages%2Fo%2Fopenafs.git enable Perl's strict and warnings in make-release Declare the undeclared variables $help, $man, and @toCompress, delete the duplicate declaration for $last, and remove the unused $tag variable. Change-Id: I33de42722b84207dc1bbad50539dc5bf92da2f5e Reviewed-on: http://gerrit.openafs.org/10117 Tested-by: BuildBot Reviewed-by: Derrick Brashear --- diff --git a/build-tools/make-release b/build-tools/make-release index e2b235b2f..32b575abf 100755 --- a/build-tools/make-release +++ b/build-tools/make-release @@ -1,12 +1,14 @@ #!/usr/bin/perl +use warnings; +use strict; use Getopt::Long; use Pod::Usage; use File::Path; use File::Temp; -my $tag; -my $last; +my $help; +my $man; my $tagPoint; my $last; my $outDir = "."; @@ -64,6 +66,9 @@ system("git describe --abbrev=4 $tagName > $tempDir/$name/.version"); system ("cd $tempDir/$name && ./regen.sh") == 0 or die $!; +# A list of files to compress +my @toCompress; + # Create the documentation tarball system("tar -cf $outDir/$name-doc.tar -C $tempDir $name/doc") == 0 or die "Unable to create documentation tarball : $!";