X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=git-svn.perl;h=24bdbf5b813ddd6c7f242189b9bb22fbe7dfff11;hb=cfe370c6476392095bc3f18013d195b1cccd6184;hp=fd7232cf6d6fcff0042a8251bbe604d02245a9a5;hpb=884cce5bd042e67a0d2a1a9317f8435634486ad1;p=git.git

diff --git a/git-svn.perl b/git-svn.perl
index fd7232cf6..24bdbf5b8 100755
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -2810,6 +2810,7 @@ sub other_gs {
 
 sub call_authors_prog {
 	my ($orig_author) = @_;
+	$orig_author = command_oneline('rev-parse', '--sq-quote', $orig_author);
 	my $author = `$::_authors_prog $orig_author`;
 	if ($? != 0) {
 		die "$::_authors_prog failed with exit code $?\n"
@@ -4831,7 +4832,11 @@ sub minimize_url {
 	my $c = '';
 	do {
 		$url .= "/$c" if length $c;
-		eval { (ref $self)->new($url)->get_latest_revnum };
+		eval {
+			my $ra = (ref $self)->new($url);
+			my $latest = $ra->get_latest_revnum;
+			$ra->get_log("", $latest, 0, 1, 0, 1, sub {});
+		};
 	} while ($@ && ($c = shift @components));
 	$url;
 }