line |
true |
false |
branch |
30
|
0 |
19 |
if @info == 1
|
67
|
15 |
5 |
if $self->repository
|
68
|
17 |
3 |
if $self->type
|
69
|
10 |
10 |
if $self->web
|
71
|
3 |
2 |
unless $repo{'url'} or $repo{'web'}
|
88
|
10 |
9 |
if (-e '.git') { }
|
|
2 |
7 |
elsif (-e '.svn') { }
|
|
2 |
5 |
elsif (-e '_darcs') { }
|
|
2 |
3 |
elsif (-e '.hg') { }
|
|
0 |
3 |
elsif (-e "$ENV{'HOME'}/.svk") { }
|
90
|
10 |
0 |
if (&$execute('git remote show -n ' . $self->git_remote) =~ /URL: (.*)$/m) { }
|
|
0 |
0 |
elsif (&$execute('git svn info') =~ /URL: (.*)$/m) { }
|
96
|
8 |
2 |
unless $git_url eq 'origin'
|
98
|
7 |
3 |
if ($git_url =~ m[^(?:git|https?)://((?:git(?:lab|hub)\.com|bitbucket.org).*?)(?:\.git)?$])
|
101
|
2 |
5 |
if ($self->github_http)
|
116
|
1 |
9 |
if ($repo{'url'} and $repo{'url'} =~ /\A\w+\z/)
|
122
|
2 |
0 |
if (&$execute('svn info') =~ /URL: (.*)$/m)
|
124
|
0 |
2 |
if ($svn_url =~ m[^https(\://.*?\.googlecode\.com/svn/.*)$])
|
132
|
2 |
0 |
if (my $query_repo = &$execute('darcs query repo'))
|
133
|
1 |
1 |
if ($query_repo =~ m[Default Remote: (http://.+)])
|
138
|
0 |
1 |
unless open my $handle, '<', '_darcs/prefs/repos'
|
141
|
1 |
1 |
if m[^http://]
|
145
|
2 |
0 |
if (&$execute('hg paths') =~ /default = (.*)$/m)
|
152
|
0 |
0 |
unless my $svk_info = &$execute('svk info')
|
154
|
0 |
0 |
if ($svk_info =~ /Mirrored From: (.*), Rev\./)
|
158
|
0 |
0 |
if ($svk_info =~ m[Merged From: (/mirror/.*), Rev\.])
|
159
|
0 |
0 |
unless $svk_info = &$execute("svk info /$1")
|