diff --git a/git-svnimport.perl b/git-svnimport.perl
index 65868a91e5f88c41942da89b84f169ed4264615d..cb241d1b5174fad6b6eb081635e614d251688f0d 100755 (executable)
--- a/git-svnimport.perl
+++ b/git-svnimport.perl
}
$opt_l = $svn->{'maxrev'} if not defined $opt_l or $opt_l > $svn->{'maxrev'};
+
+if ($svn->{'maxrev'} < $current_rev) {
+ print "Up to date: no new revisions to fetch!\n" if $opt_v;
+ unlink("$git_dir/SVN2GIT_HEAD");
+ exit;
+}
+
print "Fetching from $current_rev to $opt_l ...\n" if $opt_v;
my $pool=SVN::Pool->new;