| line |
true |
false |
branch |
|
104
|
0 |
0 |
if ($channels) { } |
|
119
|
0 |
0 |
if ($channels =~ /(\d+)\-(\d+)/) { } |
|
|
0 |
0 |
elsif ($channels =~ /^(\d*)$/) { } |
|
|
0 |
0 |
elsif ($channels =~ /^\d*,/) { } |
|
121
|
0 |
0 |
if ($end > $beg) |
|
131
|
0 |
0 |
if $DEBUG |
|
159
|
0 |
0 |
unless open CF, "<$configfile" |
|
165
|
0 |
0 |
if ($line =~ /^;/) { } |
|
|
0 |
0 |
elsif ($line =~ /^;ACZ(\w*):\s*(.*)/) { } |
|
|
0 |
0 |
elsif ($line =~ /(;.*)$/) { } |
|
|
0 |
0 |
elsif ($line =~ /^\s*$/) { } |
|
185
|
0 |
0 |
if ($line =~ /^\[(\w+)\]$/) { } |
|
|
0 |
0 |
elsif ($line =~ /^channel\s*[=>]+\s*(.*)$/) { } |
|
|
0 |
0 |
elsif ($line =~ /^(\w+)\s*[=>]+\s*(.*)/) { } |
|
201
|
0 |
0 |
if $DEBUG |
|
213
|
0 |
0 |
unless ($fh) |
|
226
|
0 |
0 |
if $key eq 'channel' |
|
227
|
0 |
0 |
if ($self->{'config'}{$context}{$channel}{$key}{'val'}) |
|
230
|
0 |
0 |
if ($self->{'config'}{$context}{$channel}{$key}{'postcomment'}) { } |
|
279
|
0 |
0 |
unless ($context) |
|
285
|
0 |
0 |
unless ($action) |
|
289
|
0 |
0 |
if ($action =~ /(.*)form$/) |
|
299
|
0 |
0 |
if ($action eq 'list') |
|
305
|
0 |
0 |
if ($action eq 'show' or $action =~ /^modify/ or $action =~ /^delete/) |
|
306
|
0 |
0 |
unless ($channel and $self->{'config'}{$context}{$channel}) |
|
312
|
0 |
0 |
if ($action eq 'deleteform') { } |
|
|
0 |
0 |
elsif ($action eq 'delete') { } |
|
|
0 |
0 |
elsif ($action eq 'show' or $action =~ /^modify/ or $action =~ /^add/) { } |
|
317
|
0 |
0 |
if ($vars{'doit'} == 1 and $self->deletechannel($context, $channel)) { } |
|
326
|
0 |
0 |
if ($action eq 'show') |
|
335
|
0 |
0 |
if ($self->{'config'}{$context}{$channel}{$var}{'val'}) { } |
|
341
|
0 |
0 |
if ($action eq 'show') { } |
|
|
0 |
0 |
elsif ($action =~ /(.*)form$/) { } |
|
|
0 |
0 |
elsif ($action eq 'modify' or $action eq 'add') { } |
|
347
|
0 |
0 |
if ($fieldtype eq 'text') { } |
|
|
0 |
0 |
elsif ($fieldtype eq 'one') { } |
|
352
|
0 |
0 |
if $item eq $value |
|
358
|
0 |
0 |
if ($action eq 'add' or $vars{$var} ne $vars{"OLD$var"}) |
|
361
|
0 |
0 |
if ($self->variablecheck($context, $var, $newval)) |
|
372
|
0 |
0 |
if ($action =~ /form$/) |