| line |
true |
false |
branch |
|
189
|
0 |
0 |
unless $args{'PARENT'} |
|
190
|
0 |
0 |
unless $ret = $new->_parent($args{'PARENT'}) |
|
191
|
0 |
0 |
if ($args{'CHANNELS'}) |
|
193
|
0 |
0 |
if (ref $args{'CHANNELS'} and UNIVERSAL::isa($args{'CHANNELS'}, 'HASH')) { } |
|
200
|
0 |
0 |
unless $ret = $new->new_channel(%{$_;}) |
|
203
|
0 |
0 |
if ($args{'CATEGORIES'}) |
|
205
|
0 |
0 |
unless $ret = $new->category(@{$_;}) |
|
208
|
0 |
0 |
unless $ret = Unix::Conf::Bind8::Conf::_add_logging($new) |
|
209
|
0 |
0 |
unless $args{'WHERE'} |
|
210
|
0 |
0 |
unless $ret = Unix::Conf::Bind8::Conf::_insert_in_list($new, $args{'WHERE'}, $args{'WARG'}) |
|
239
|
0 |
0 |
unless __valid_category $category |
|
241
|
0 |
0 |
if (@_) |
|
243
|
0 |
0 |
if (ref $_[0]) { } |
|
244
|
0 |
0 |
unless UNIVERSAL::isa($_[0], 'ARRAY') |
|
252
|
0 |
0 |
unless $ret = __valid_channel($self, $_) |
|
258
|
0 |
0 |
if _is_predef_channel($_) |
|
259
|
0 |
0 |
unless $chan = $self->get_channel($_) |
|
260
|
0 |
0 |
unless $ret = $chan->_add_category($category) |
|
267
|
0 |
0 |
defined $$self{'categories'}{$category} ? : |
|
290
|
0 |
0 |
unless __valid_category $category |
|
292
|
0 |
0 |
unless @_ |
|
296
|
0 |
0 |
unless $ret = __valid_channel($self, $_) |
|
297
|
0 |
0 |
if $$self{'categories'}{$category}{$_} |
|
304
|
0 |
0 |
if _is_predef_channel($_) |
|
305
|
0 |
0 |
unless $chan = $self->get_channel($_) |
|
306
|
0 |
0 |
unless $ret = $chan->_add_category($category) |
|
333
|
0 |
0 |
unless __valid_category $category |
|
335
|
0 |
0 |
unless @_ |
|
339
|
0 |
0 |
unless $ret = __valid_channel($self, $_) |
|
340
|
0 |
0 |
unless $$self{'categories'}{$category}{$_} |
|
347
|
0 |
0 |
if _is_predef_channel($_) |
|
348
|
0 |
0 |
unless $chan = $self->get_channel($_) |
|
349
|
0 |
0 |
unless $ret = $chan->_delete_category($category) |
|
354
|
0 |
0 |
unless keys %{$$self{'categories'}{$category};} |
|
374
|
0 |
0 |
unless __valid_category $category |
|
376
|
0 |
0 |
unless defined $$self{'categories'}{$category} |
|
394
|
0 |
0 |
wantarray ? : |
|
447
|
0 |
0 |
unless $_[1] |
|
468
|
0 |
0 |
unless $channel = _get_channel($self, $name) |
|
484
|
0 |
0 |
wantarray ? : |
|
493
|
0 |
0 |
unless $obj |
|
495
|
0 |
0 |
unless $name = $obj->name |
|
496
|
0 |
0 |
unless $parent = $obj->_parent |
|
497
|
0 |
0 |
if $$parent{'channels'}{$name} |
|
507
|
0 |
0 |
unless $name |
|
509
|
0 |
0 |
unless $$self{'channels'}{$name} |
|
518
|
0 |
0 |
unless $name |
|
520
|
0 |
0 |
if _is_predef_channel($name) |
|
522
|
0 |
0 |
unless $$logging{'channels'}{$name} |
|
532
|
0 |
0 |
unless $name =~ /^(default_syslog|default_debug|default_stderr|null)$/ |
|
541
|
0 |
0 |
unless _is_predef_channel($name) or _get_channel($self, $name) |
|
565
|
0 |
0 |
unless $channels = $self->category($_) |