Merge in fixes up to 1.0.3 maintenance branch.
[gitweb.git] / git-svnimport.perl
index 65868a91e5f88c41942da89b84f169ed4264615d..cb241d1b5174fad6b6eb081635e614d251688f0d 100755 (executable)
@@ -736,6 +736,13 @@ sub commit_all {
 }
 
 $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;