summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xgit-debrebase7
1 files changed, 5 insertions, 2 deletions
diff --git a/git-debrebase b/git-debrebase
index c690172..927a391 100755
--- a/git-debrebase
+++ b/git-debrebase
@@ -1154,6 +1154,10 @@ sub keycommits ($;$$$$$) {
return ($anchor, $breakwater);
}
+sub treated_anchor_msg () {
+ __ 'old anchor is recognised due to --anchor, cannot check upstream'
+}
+
sub walk ($;$$$);
sub walk ($;$$$) {
my ($input,
@@ -2033,8 +2037,7 @@ sub cmd_new_upstream () {
my $old_anchor_cl = classify $old_anchor;
my $old_upstream;
if (!$old_anchor_cl->{OrigParents}) {
- snag 'anchor-treated',
- __ 'old anchor is recognised due to --anchor, cannot check upstream';
+ snag 'anchor-treated', treated_anchor_msg();
} else {
$old_upstream = parsecommit
$old_anchor_cl->{OrigParents}[0]{CommitId};