| line |
true |
false |
branch |
|
30
|
0 |
17 |
if ($line =~ s/^#\+TODO:\s*//) |
|
31
|
0 |
0 |
unless my($undone_keywords, $done_keywords) = $line =~ /^\s*(.*?)\s*\|\s*(.*?)\s*$/ |
|
42
|
1 |
0 |
unless @undone_keywords |
|
43
|
1 |
0 |
unless @done_keywords |
|
58
|
11 |
6 |
if ($line =~ /^(\*+) (.*)/) { } |
|
68
|
0 |
11 |
if ($title =~ s/\s*($undone_re)\s+//) { } |
|
|
0 |
11 |
elsif ($title =~ s/\s*($done_re)\s+//) { } |
|
83
|
1 |
10 |
if ($title =~ s/\s+:((?:\w+:)+)$//) |
|
98
|
11 |
33 |
if ($i == 0 or $nodes[$i]{'level'} < $level) |
|
116
|
0 |
1 |
unless defined $arg |
|
122
|
1 |
0 |
if (not $r) { } |
|
|
0 |
0 |
elsif ($r eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($r eq 'GLOB' or blessed($arg) and $arg->isa('IO::Handle')) { } |
|
|
0 |
0 |
elsif ($r eq 'CODE') { } |
|
147
|
0 |
0 |
unless open my $fh, '<', $filename |
|
166
|
0 |
0 |
if (@_ > 1) |
|
173
|
0 |
11 |
if (@_ > 1) |
|
176
|
0 |
11 |
unless $_[0]{'children'} |
|
211
|
0 |
0 |
if (@_ > 1) |
|
216
|
0 |
0 |
if (@_ > 1) |
|
221
|
0 |
0 |
if (@_ > 1) |
|
226
|
0 |
0 |
if (@_ > 1) |
|
231
|
0 |
0 |
if (@_ > 1) |
|
236
|
0 |
0 |
if (@_ > 1) |
|
237
|
0 |
0 |
unless $_[0]{'tags'} |
|
247
|
0 |
1 |
length $_[0]{'todo_state'} ? : |
|
|
1 |
0 |
defined $_[0]{'tags'} ? : |