git-svn: save a little memory as fetch progresses

There is no reason to keep entries in the %revs hash after we're done processing a revision, so allow entries become freed as processing continues. Signed-off-by: Eric Wong <normalperson@yhbt.net>

Eric Wong committed Oct 25, 2014 at 07:56 UTC aee7d04c126b48a9871309ec65cecf88781b1d32
1 file changed +1 -1
perl/Git/SVN/Ra.pm
+1 -1
@@ -431,7 +431,7 @@ sub gs_fetch_loop_common {
431
432 my %exists = map { $_->path => $_ } @$gsv;
433 foreach my $r (sort {$a <=> $b} keys %revs) {
434 - my ($paths, $logged) = @{$revs{$r}};
434 + my ($paths, $logged) = @{delete $revs{$r}};
435
436 foreach my $gs ($self->match_globs(\%exists, $paths,
437 $globs, $r)) {