diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2019-01-13 18:35:18 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2019-01-13 18:39:19 +0000 |
commit | 23a0de6747ba1c63d42a0e5bd954ba299f0bb4a3 (patch) | |
tree | 38528b1612f604d95f63204a64e67ec1980a7a55 /dgit | |
parent | 6470922a0514eba2e8146bc0e21064f6686fbbca (diff) |
dgit: cmd_import_dsc: comment on lack of is_orig_file check
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 7 |
1 files changed, 7 insertions, 0 deletions
@@ -7003,12 +7003,19 @@ END my @dfi = dsc_files_info(); foreach my $fi (@dfi) { my $f = $fi->{Filename}; + # We transfer all the pieces of the dsc to the bpd, not just + # origs. This is by analogy with dgit fetch, which wants to + # keep them somewhere to avoid downloading them again. + # We make symlinks, though. If the user wants copies, then + # they can copy the parts of the dsc to the bpd using dcmd, + # or something. my $here = "$buildproductsdir/$f"; if (lstat $here) { next if stat $here; fail f_ "lstat %s works but stat gives %s !", $here, $!; } fail f_ "stat %s: %s", $here, $! unless $! == ENOENT; + # $f does not exist in bpd, we need to transfer it my $there = $dscfn; if ($dscfn =~ m#^(?:\./+)?\.\./+#) { $there = $'; |