Branch Coverage

blib/lib/Module/Install/Repository.pm
Criterion Covered Total %
branch 0 38 0.0


line true false branch
18 0 0 unless $Module::Install::AUTHOR
21 0 0 if ($repo) { }
31 0 0 if (-e '.git') { }
0 0 elsif (-e '.svn') { }
0 0 elsif (-e '_darcs') { }
0 0 elsif (-e '.hg') { }
0 0 elsif (-e "$ENV{'HOME'}/.svk") { }
34 0 0 if ($git_output =~ /Tracked remote branch/ and $git_output =~ /URL: (.*)$/m)
42 0 0 if (&$execute("git svn info") =~ /URL: (.*)$/m)
46 0 0 if (`svn info` =~ /URL: (.*)$/m)
51 0 0 if (my $query_repo = `darcs query repo`)
52 0 0 if ($query_repo =~ m[Default Remote: (http://.+)])
57 0 0 unless open my $handle, "<", "_darcs/prefs/repos"
60 0 0 if m[^http://]
63 0 0 if (&$execute("hg paths") =~ /default = (.*)$/m)
70 0 0 unless my $svk_info = `svk info`
72 0 0 if ($svk_info =~ /Mirrored From: (.*), Rev\./)
76 0 0 if ($svk_info =~ m[Merged From: (/mirror/.*), Rev\.])
77 0 0 unless $svk_info = `svk info /$1`