| line |
true |
false |
branch |
|
30
|
0 |
14 |
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
|
8 |
6 |
if ($line =~ /^(\*+) (.*)/) { } |
|
68
|
0 |
8 |
if ($title =~ s/\s*($undone_re)\s+//) { } |
|
|
0 |
8 |
elsif ($title =~ s/\s*($done_re)\s+//) { } |
|
83
|
1 |
7 |
if ($title =~ s/\s+:((?:\w+:)+)$//) |
|
98
|
8 |
19 |
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 |
3 |
unless $_[0]{'children'} |
|
198
|
0 |
0 |
if (@_ > 1) |
|
203
|
0 |
0 |
if (@_ > 1) |
|
208
|
0 |
0 |
if (@_ > 1) |
|
213
|
0 |
0 |
if (@_ > 1) |
|
218
|
0 |
0 |
if (@_ > 1) |
|
223
|
0 |
0 |
if (@_ > 1) |
|
224
|
0 |
0 |
unless $_[0]{'tags'} |
|
237
|
0 |
1 |
length $_[0]{'todo_state'} ? : |
|
|
1 |
0 |
defined $_[0]{'tags'} ? : |