| 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") |
| 51 | 50 | T | F | if $file =~ m[^https?://] |
| 60 | 50 | T | F | if $dir eq $parent |
| 62 | 100 | T | F | if defined $CheckSpelling::SummaryTables::git_roots{$dir} |
| 64 | 50 | T | F | if (-e $git_dir) |
| 65 | 50 | T | F | if (-d $git_dir) |
| 69 | 0 | T | F | if (-s $git_dir) |
| 73 | 0 | T | F | if ($git_dir_path =~ /^gitdir: (.*)$/) |
| 86 | 50 | T | F | unless defined $last_git_dir |
| 91 | 100 | T | F | if (defined $CheckSpelling::SummaryTables::github_urls{$last_git_dir}) { } |
| 101 | 50 | T | F | if (grep {/^origin$/;} @remotes) { } |
| 0 | T | F | elsif (@remotes) { } |
| 108 | 50 | T | F | if ($origin) |
| 114 | 50 | T | F | if (defined $private_synthetic_sha) |
| 115 | 0 | T | F | if $rev eq $private_synthetic_sha |
| 121 | 50 | T | F | if ($remote_url and $remote_url ne '.') { } |
| 0 | T | F | elsif ($ENV{'GITHUB_SERVER_URL'} ne '' and $ENV{'GITHUB_REPOSITORY'} ne '') { } |
| 122 | 100 | T | F | unless ($remote_url =~ m[^https?://]) |
| 129 | 0 | T | F | unless $rev |
| 131 | 50 | T | F | if ($url_base) |
| 132 | 50 | T | F | if ($CheckSpelling::SummaryTables::pull_base) |
| 137 | 50 | T | F | if ($last_git_dir) |
| 141 | 50 | T | F | if $prefix =~ m[https?://] |
| 158 | 50 | T | F | if ($head_ref and $github_url and $github_repository and $event_file_path) |
| 159 | 50 | T | F | if (open $event_file_handle, "<", $event_file_path) |
| 166 | 100 | T | F | unless ($CheckSpelling::SummaryTables::pull_head and $CheckSpelling::SummaryTables::pull_base and $CheckSpelling::SummaryTables::pull_base ne $CheckSpelling::SummaryTables::pull_head) |
| 173 | 100 | T | F | unless /^(.+):(\d+):(\d+) \.\.\. (\d+),\s(Error|Warning|Notice)\s-\s(.+)\s\(([-a-z]+)\)$/ |
| 176 | 100 | T | F | unless -e $table_file |
| 183 | 100 | T | F | unless @tables |
| 192 | 50 | T | F | if ($budget) |
| 203 | 100 | T | F | if ($budget and $budget < $cost) |
| 215 | 50 | T | F | if ($real_cost > $cost) |
| 217 | 0 | T | F | if ($budget and $budget < $real_cost) |
| 222 | 100 | T | F | if ($details_prefix ne "") |
| 230 | 50 | T | F | if ($budget) |
| 235 | 100 | T | F | if $need_suffix |