diff options
author | Eric Wong <normalperson@yhbt.net> | 2007-02-15 05:38:46 +0300 |
---|---|---|
committer | Eric Wong <normalperson@yhbt.net> | 2007-02-23 11:57:13 +0300 |
commit | 7447b4bc837d2f73fb4cd34f2a44a0cb120c5c39 (patch) | |
tree | 269726407e02d42e32bc7f16e6d615cfc3068942 | |
parent | e8d120bd5a7e09b24c6fa2245cf429e3411028ee (diff) |
git-svn: error checking for invalid [svn-remote "..."] sections
We don't end up trying to pass an undef URL over to SVN::Ra->new
because it'll segfault.
Signed-off-by: Eric Wong <normalperson@yhbt.net>
-rwxr-xr-x | git-svn.perl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/git-svn.perl b/git-svn.perl index ace31021e7..201418e09c 100755 --- a/git-svn.perl +++ b/git-svn.perl @@ -753,9 +753,10 @@ sub parse_revision_argument { sub fetch_all { my ($repo_id, $remotes) = @_; - my $remote = $remotes->{$repo_id}; + my $remote = $remotes->{$repo_id} or + die "[svn-remote \"$repo_id\"] unknown\n"; my $fetch = $remote->{fetch}; - my $url = $remote->{url}; + my $url = $remote->{url} or die "svn-remote.$repo_id.url not defined\n"; my (@gs, @globs); my $ra = Git::SVN::Ra->new($url); my $uuid = $ra->get_uuid; |