diff options
| author |  Eric Wong <normalperson@yhbt.net> | 2007-02-14 18:38:46 -0800 |
|---|---|---|
| committer | Eric Wong <normalperson@yhbt.net> | 2007-02-23 00:57:13 -0800 |
| commit | 7447b4bc837d2f73fb4cd34f2a44a0cb120c5c39 (patch) | |
| tree | 269726407e02d42e32bc7f16e6d615cfc3068942 | |
| parent | git-svn: remember to check for clean indices on globbed refs, too (diff) | |
| download | tgif-7447b4bc837d2f73fb4cd34f2a44a0cb120c5c39.tar.xz | |
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; |