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

NFC.

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

diff --git a/git-debrebase b/git-debrebase
index 482c432de9d0f6af2d3603b0965a45b27c422035..24aefbe574c4e53703c0dff6969e376c24d97984 100755 (executable)
--- 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)) {