git-debrebase: walk: Move $read_tree_upstream into the loop

NFC.

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

1 files changed, 6 insertions, 5 deletions

diff --git a/git-debrebase b/git-debrebase
index 482c432..24aefbe 100755
--- a/git-debrebase
+++ b/git-debrebase
@@ -1423,11 +1423,6 @@ sub walk ($;$$$) {
 
     my $rewriting = 0;
 
-    my $read_tree_upstream = sub {
-	my ($treeish) = @_;
-	read_tree_upstream $treeish, 0, $build;
-    };
-
     $#upp_cl = $upp_limit if defined $upp_limit;
  
     my $committer_authline = calculate_committer_authline();
@@ -1440,6 +1435,12 @@ sub walk ($;$$$) {
 	mkdir $rd or $!==EEXIST or die $!;
 	my $current_method;
 	runcmd @git, qw(read-tree), $build;
+
+	my $read_tree_upstream = sub {
+	    my ($treeish) = @_;
+	    read_tree_upstream $treeish, 0, $build;
+	};
+
 	foreach my $cl (qw(Debian), (reverse @brw_cl),
 			{ SpecialMethod => 'RecordBreakwaterTip' },
 			qw(Upstream), (reverse @upp_cl)) {