summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGedalya <gedalya@gedalya.net>2015-06-20 14:33:14 +0100
committerJeremy Harris <jgh146exb@wizmail.org>2015-06-20 15:22:15 +0100
commit3ec6ea71df430ae68c0f22391f75fee13107d26f (patch)
tree1608ae5103c42add7f9d4188078d6e560099c745
parent09b80b4efb12380da54d64608fd0c1a37733c598 (diff)
Fix build script. Bug 1646
-rwxr-xr-xrelease-process/scripts/mk_exim_release.pl3
1 files changed, 2 insertions, 1 deletions
diff --git a/release-process/scripts/mk_exim_release.pl b/release-process/scripts/mk_exim_release.pl
index a68d1e66a..995720e2c 100755
--- a/release-process/scripts/mk_exim_release.pl
+++ b/release-process/scripts/mk_exim_release.pl
@@ -117,7 +117,7 @@ sub make_version_script {
}
my $srcdir = File::Spec->catdir( $context->{release_tree}, 'src', 'src' );
- chdir $srcdir or die "chdir $srcdir: $\n";
+ chdir $srcdir or die "chdir $srcdir: $!\n";
if ( -f "version.sh" ) {
print( "WARNING: version.sh already exists - leaving it in place\n" );
@@ -297,6 +297,7 @@ sub do_cleanup {
my $context = shift;
print "Cleaning up\n" if ($verbose);
+ chdir( $context->{directory} ) || die;
rmtree( $context->{release_tree}, { verbose => $debug } );
rmtree( $context->{docbook}, { verbose => $debug } );
rmtree( $context->{pkgdirs}, { verbose => $debug } );