diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2018-08-04 07:39:11 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2018-08-04 07:39:11 +0100 |
commit | 3e041f7eae8fcac38d485e17df481b9b0aeef9b8 (patch) | |
tree | 37d84cf44d4a6448d6b4fe66f5818c082a5dea4a /git-debrebase | |
parent | e8d0e4e6c4a5c34798d6be4e6b5be2349301d584 (diff) |
git-debrebase: Break out resolve_upstream_version
NFC.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'git-debrebase')
-rwxr-xr-x | git-debrebase | 19 |
1 files changed, 12 insertions, 7 deletions
diff --git a/git-debrebase b/git-debrebase index a28b910..35284d5 100755 --- a/git-debrebase +++ b/git-debrebase @@ -1184,18 +1184,23 @@ sub do_stitch ($;$) { stitch($dangling_head, $ffq_prev, $gdrlast, $ffq_prev_commitish, $prose); } +sub upstream_commitish_search ($$) { + my ($upstream_version, $tried) = @_; + # todo: at some point maybe use git-deborig to do this + foreach my $tagpfx ('', 'v', 'upstream/') { + my $tag = $tagpfx.(dep14_version_mangle $upstream_version); + my $new_upstream = git_get_ref "refs/tags/$tag"; + return $new_upstream if length $new_upstream; + push @$tried, $tag; + } +} + sub resolve_upstream_version ($$) { my ($new_upstream, $upstream_version) = @_; if (!defined $new_upstream) { my @tried; - # todo: at some point maybe use git-deborig to do this - foreach my $tagpfx ('', 'v', 'upstream/') { - my $tag = $tagpfx.(dep14_version_mangle $upstream_version); - $new_upstream = git_get_ref "refs/tags/$tag"; - last if length $new_upstream; - push @tried, $tag; - } + $new_upstream = upstream_commitish_search $upstream_version, \@tried; if (!length $new_upstream) { fail "Could not determine appropriate upstream commitish.\n". " (Tried these tags: @tried)\n". |