diff options
| author | Gedalya <gedalya@gedalya.net> | 2015-06-20 14:33:14 +0100 |
|---|---|---|
| committer | Jeremy Harris <jgh146exb@wizmail.org> | 2015-06-20 15:22:15 +0100 |
| commit | 3ec6ea71df430ae68c0f22391f75fee13107d26f (patch) | |
| tree | 1608ae5103c42add7f9d4188078d6e560099c745 /release-process | |
| parent | 09b80b4efb12380da54d64608fd0c1a37733c598 (diff) | |
Fix build script. Bug 1646
Diffstat (limited to 'release-process')
| -rwxr-xr-x | release-process/scripts/mk_exim_release.pl | 3 |
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 } ); |