From: Yaacov Akiba Slama <ya@slamail.org>
Date: Wed, 2 Nov 2005 21:51:58 +0000 (+0200)
Subject: Lift the default limit of number of revs.
X-Git-Tag: v0.99.9g^2~2^2~1
X-Git-Url: https://git.lorimer.id.au/gitweb.git/diff_plain/01d4f0e7758f0fa837eec18a901a668f816cfc5f

Lift the default limit of number of revs.

Now that the leak is gone, there is by default no limit of revisions to
import.  No more message about leak when the limit (given by the -l
parameter) is reached.

Signed-off-by: Yaacov Akiba Slama <ya@slamail.org>
Signed-off-by: Junio C Hamano <junkio@cox.net>
---

diff --git a/git-svnimport.perl b/git-svnimport.perl
index e97f47059f..ab690f3643 100755
--- a/git-svnimport.perl
+++ b/git-svnimport.perl
@@ -53,7 +53,6 @@ END
 
 $opt_o ||= "origin";
 $opt_s ||= 1;
-$opt_l = 100 unless defined $opt_l;
 my $git_tree = $opt_C;
 $git_tree ||= ".";
 
@@ -727,15 +726,16 @@ sub commit_all {
 }
 
 while(++$current_rev <= $svn->{'maxrev'}) {
+	if (defined $opt_l) {
+		$opt_l--;
+		if ($opt_l < 0) {
+			last;
+		}
+	}
 	my $pool=SVN::Pool->new;
 	$svn->{'svn'}->get_log("/",$current_rev,$current_rev,1,1,1,\&_commit_all,$pool);
 	$pool->clear;
 	commit_all();
-	if($opt_l and not --$opt_l) {
-		print STDERR "Stopping, because there is a memory leak (in the SVN library).\n";
-		print STDERR "Please repeat this command; it will continue safely\n";
-		last;
-	}
 }