diff options
| -rwxr-xr-x | dgit | 9 |
1 files changed, 9 insertions, 0 deletions
@@ -2197,6 +2197,12 @@ sub check_for_vendor_patches () { __ "(nominal) distro being accessed"); } +sub check_bpd_exists () { + stat $buildproductsdir + or fail f_ "build-products-dir %s is not accessible: %s\n", + $buildproductsdir, $!; +} + sub generate_commits_from_dsc () { # See big comment in fetch_from_archive, below. # See also README.dsc-import. @@ -3062,6 +3068,7 @@ END } sub fetch_from_archive () { + check_bpd_exists(); ensure_setup_existing_tree(); # Ensures that lrref() is what is actually in the archive, one way @@ -3760,6 +3767,7 @@ sub clone ($) { mkdir $dstdir or fail f_ "create \`%s': %s", $dstdir, $!; changedir $dstdir; + check_bpd_exists(); canonicalise_suite(); my $hasgit = check_for_git(); @@ -6305,6 +6313,7 @@ sub build_prep_early () { sub build_prep ($) { my ($wantsrc) = @_; build_prep_early(); + check_bpd_exists(); if (!building_source_in_playtree() || ($wantsrc & WANTSRC_BUILDER)) { # Clean the tree because we're going to use the contents of # $maindir. (We trying to include dirty changes in the source |