Merge branch 'master' of git://bogomips.org/git-svn
* 'master' of git://bogomips.org/git-svn: git-svn: warn instead of dying when commit data is missing git-svn: clone: Fail on missing url argument
This commit is contained in:
commit
3f933701dc
@ -507,7 +507,10 @@ sub init_subdir {
|
||||
|
||||
sub cmd_clone {
|
||||
my ($url, $path) = @_;
|
||||
if (!defined $path &&
|
||||
if (!$url) {
|
||||
die "SVN repository location required ",
|
||||
"as a command-line argument\n";
|
||||
} elsif (!defined $path &&
|
||||
(defined $_trunk || @_branches || @_tags ||
|
||||
defined $_stdlayout) &&
|
||||
$url !~ m#^[a-z\+]+://#) {
|
||||
|
@ -97,8 +97,12 @@ sub resolve_local_globs {
|
||||
"existing: $existing\n",
|
||||
" globbed: $refname\n";
|
||||
}
|
||||
my $u = (::cmt_metadata("$refname"))[0] or die
|
||||
"$refname: no associated commit metadata\n";
|
||||
my $u = (::cmt_metadata("$refname"))[0];
|
||||
if (!defined($u)) {
|
||||
warn
|
||||
"W: $refname: no associated commit metadata from SVN, skipping\n";
|
||||
next;
|
||||
}
|
||||
$u =~ s!^\Q$url\E(/|$)!! or die
|
||||
"$refname: '$url' not found in '$u'\n";
|
||||
if ($pathname ne $u) {
|
||||
|
Loading…
Reference in New Issue
Block a user