diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-08 02:45:38 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-08 22:14:48 +0000 |
commit | c4ff745bf2423178860cb7ab6905f0cd6565c37b (patch) | |
tree | 33edcbaafb2eea83eb2cc70e5a3cf547505beab1 /dgit | |
parent | 8e176e95b2137b2103bba97c8cd6af09a3fdc4a7 (diff) |
git fetching: git_lrfetch_sane: Introduce my $url
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -2539,6 +2539,8 @@ sub git_lrfetch_sane { # git fetch to try to generate it. If we don't manage to generate # the target state, we try again. + my $url = access_giturl(); + printdebug "git_lrfetch_sane specs @specs\n"; my $specre = join '|', map { @@ -2562,7 +2564,7 @@ sub git_lrfetch_sane { } my @look = map { "refs/$_" } @specs; - my @lcmd = (@git, qw(ls-remote -q --refs), access_giturl(), @look); + my @lcmd = (@git, qw(ls-remote -q --refs), $url, @look); debugcmd "|",@lcmd; my %wantr; @@ -2590,7 +2592,7 @@ END printdebug "git_lrfetch_sane fspecs @fspecs\n"; - my @fcmd = (@git, qw(fetch -p -n -q), access_giturl(), @fspecs); + my @fcmd = (@git, qw(fetch -p -n -q), $url, @fspecs); runcmd_ordryrun_local @fcmd if @fspecs; %lrfetchrefs_f = (); |