| line | % | coverage | branch |
|---|
| 23 | 100 | T | F | unless $source =~ m[^[^/]+/[^/]+$] |
| 35 | 100 | T | F | if defined $git_dir |
| 36 | 50 | T | F | if ($ENV{'PATH'} =~ /(.*)/) |
| 39 | 100 | T | F | if (-x "$maybe_git/git") |
| 58 | 50 | T | F | if $dir eq $parent |
| 60 | 100 | T | F | if defined $CheckSpelling::GitSources::git_roots{$dir} |
| 62 | 50 | T | F | if (-e $git_dir) |
| 63 | 50 | T | F | if (-d $git_dir) |
| 67 | 0 | T | F | if (-s $git_dir) |
| 71 | 0 | T | F | if ($git_dir_path =~ /^gitdir: (.*)$/) |
| 84 | 50 | T | F | unless defined $last_git_dir |
| 88 | 100 | T | F | if (defined $CheckSpelling::GitSources::github_urls{$last_git_dir}) { } |
| 98 | 50 | T | F | if (grep {/^origin$/;} @remotes) { } |
| 0 | T | F | elsif (@remotes) { } |
| 105 | 50 | T | F | if ($origin) |
| 111 | 50 | T | F | if (defined $private_synthetic_sha) |
| 112 | 0 | T | F | if $rev eq $private_synthetic_sha |
| 118 | 50 | T | F | if $remote_url eq "." |
| 119 | 50 | T | F | if ($remote_url) { } |
| 0 | T | F | elsif ($ENV{'GITHUB_SERVER_URL'} ne '' and $ENV{'GITHUB_REPOSITORY'} ne '') { } |
| 120 | 100 | T | F | unless ($remote_url =~ m[^https?://]) |
| 127 | 0 | T | F | unless $rev |
| 129 | 50 | T | F | if ($url_base) |
| 130 | 50 | T | F | if ($CheckSpelling::GitSources::pull_base) |
| 135 | 50 | T | F | if ($last_git_dir) |