From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 8 Jan 2017 02:45:38 +0000 (+0000)
Subject: git fetching: git_lrfetch_sane: Introduce my $url
X-Git-Tag: archive/debian/3.0~66
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=commitdiff_plain;h=c4ff745bf2423178860cb7ab6905f0cd6565c37b;hp=8e176e95b2137b2103bba97c8cd6af09a3fdc4a7;ds=sidebyside

git fetching: git_lrfetch_sane: Introduce my $url

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/dgit b/dgit
index 845edd3a..4f6d111b 100755
--- a/dgit
+++ b/dgit
@@ -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 = ();