From 1d40cf793435df8be77fd789ada3faa18c480f8e Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Fri, 10 Aug 2018 09:59:09 +0100 Subject: [PATCH] git-debrebase: walk: Introduce $report_lprefix (nfc) Signed-off-by: Ian Jackson --- git-debrebase | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/git-debrebase b/git-debrebase index 24be35e3..0d3162fd 100755 --- a/git-debrebase +++ b/git-debrebase @@ -661,14 +661,15 @@ sub keycommits ($;$$$$) { return ($anchor, $breakwater); } -sub walk ($;$$); -sub walk ($;$$) { +sub walk ($;$$$); +sub walk ($;$$$) { my ($input, - $nogenerate,$report) = @_; + $nogenerate,$report, $report_lprefix) = @_; # => ($tip, $breakwater_tip, $last_anchor) # (or nothing, if $nogenerate) printdebug "*** WALK $input ".($nogenerate//0)." ".($report//'-')."\n"; + $report_lprefix //= ''; # go through commits backwards # we generate two lists of commits to apply: @@ -700,7 +701,7 @@ sub walk ($;$$) { my $prline = sub { return unless $report; - print $report $prdelim, @_; + print $report $prdelim, $report_lprefix, @_; $prdelim = "\n"; }; -- 2.30.2