From 502c1bf629154b4a248105b10346a06a6ff07387 Mon Sep 17 00:00:00 2001
From: Eric Wong <normalperson@yhbt.net>
Date: Thu, 1 Feb 2007 04:26:00 -0800
Subject: [PATCH] git-svn: avoid extra get_log calls when refspecs are added
 for fetching

Since fetch_loop_common starts from the lowest revision number
in a group of Git::SVN objects; we want to avoid refetching
get_log for current users for things we've already cut it.

Signed-off-by: Eric Wong <normalperson@yhbt.net>
---
 git-svn.perl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/git-svn.perl b/git-svn.perl
index 58d0600f8..8c24012e7 100755
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -2370,7 +2370,12 @@ sub gs_fetch_loop_common {
 			skip_unknown_revs($err);
 		};
 		foreach my $gs (@gs) {
-			$self->get_log([$gs->{path}], $min, $max, 0, 1, 1, sub
+			my $min_r = $min;
+			my $rdb_max = $gs->rev_db_max;
+			next if $rdb_max >= $max;
+			$min_r = $rdb_max + 1 if ($rdb_max > $min_r);
+			$self->get_log([$gs->{path}], $min_r, $max,
+			               0, 1, 1, sub
 			               { my ($paths, $rev) = @_;
 			                 push @{$revs{$rev}},
 			                      [ $gs,
-- 
2.30.2