Branch Coverage

blib/lib/Dist/Zilla/Plugin/Repository.pm
Criterion Covered Total %
branch 36 54 66.6


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")