diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-10 14:10:50 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-10 14:10:50 +0000 |
commit | f8b6719127ece2bdf5d26c85a5f35060a4222b70 (patch) | |
tree | 9b7af766e9eff155cd942b3e470e5425c6386399 /dgit | |
parent | 21aacbe2f3a81c172ac0c3c5a9b8b8411897b0c8 (diff) |
dgit: generate_commits_from_dsc: Introduce $upper_f
No functional change.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -2070,10 +2070,11 @@ sub generate_commits_from_dsc () { foreach my $fi (@dfi) { my $f = $fi->{Filename}; die "$f ?" if $f =~ m#/|^\.|\.dsc$|\.tmp$#; + my $upper_f = "../../../../$f"; printdebug "considering linking $f: "; - link_ltarget "../../../../$f", $f + link_ltarget $upper_f, $f or ((printdebug "($!) "), 0) or $!==&ENOENT or die "$f $!"; @@ -2083,7 +2084,7 @@ sub generate_commits_from_dsc () { complete_file_from_dsc('.', $fi) or next; - link $f, "../../../../$f" + link $f, $upper_f or $!==&EEXIST or die "$f $!"; } |