summaryrefslogtreecommitdiff
path: root/git-svnimport.perl
diff options
context:
space:
mode:
authorYaacov Akiba Slama <ya@slamail.org>2005-11-02 23:51:58 +0200
committerJunio C Hamano <junkio@cox.net>2005-11-08 01:24:50 -0800
commit01d4f0e7758f0fa837eec18a901a668f816cfc5f (patch)
tree128cee3555f6892b55fb061b7eaac44fb5038005 /git-svnimport.perl
parenta16db4f472887a9050bf528bc7f0b94d6f7e8319 (diff)
downloadgit-01d4f0e7758f0fa837eec18a901a668f816cfc5f.tar.gz
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>
Diffstat (limited to 'git-svnimport.perl')
-rwxr-xr-xgit-svnimport.perl12
1 files changed, 6 insertions, 6 deletions
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 @@ my $branch_name = $opt_b || "branches";
$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;
- }
}