X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=git-svnimport.perl;h=3af8c7e1106d755b1589750ff5673ff6a6cd3b14;hb=ced38ea252cb8b0315f4d2a54648b11c6c090657;hp=afbbe63c622c29e86e3a7ac971e6f88ed93dd6a2;hpb=09c3a408da1d02a3ea1119694b5deaeb14c20d65;p=git.git diff --git a/git-svnimport.perl b/git-svnimport.perl index afbbe63c6..3af8c7e11 100755 --- a/git-svnimport.perl +++ b/git-svnimport.perl @@ -285,7 +285,7 @@ my $last_rev = ""; my $last_branch; my $current_rev = $opt_s || 1; unless(-d $git_dir) { - system("git-init-db"); + system("git-init"); die "Cannot init the GIT db at $git_tree: $?\n" if $?; system("git-read-tree"); die "Cannot init an empty tree: $?\n" if $?; @@ -943,10 +943,10 @@ if ($opt_l < $current_rev) { print "Processing from $current_rev to $opt_l ...\n" if $opt_v; my $from_rev; -my $to_rev = $current_rev; +my $to_rev = $current_rev - 1; while ($to_rev < $opt_l) { - $from_rev = $to_rev; + $from_rev = $to_rev + 1; $to_rev = $from_rev + $repack_after; $to_rev = $opt_l if $opt_l < $to_rev; print "Fetching from $from_rev to $to_rev ...\n" if $opt_v;