| line |
true |
false |
branch |
|
62
|
0 |
0 |
unless ($app_class->can('new'))
|
|
63
|
0 |
0 |
unless eval "use $app_class; 1"
|
|
66
|
0 |
0 |
unless $app_class->isa('Cog::App') and $app_class ne 'Cog::App'
|
|
77
|
0 |
0 |
unless UNIVERSAL::can($config_class, 'new')
|
|
82
|
0 |
0 |
-e $config_file ? :
|
|
86
|
0 |
0 |
if ($app_class ne ref $self)
|
|
87
|
0 |
0 |
unless eval "require $app_class; 1"
|
|
109
|
0 |
0 |
unless my $function = $self->can($method)
|
|
112
|
0 |
0 |
if ($action ne 'init')
|
|
113
|
0 |
0 |
unless $self->config_file
|
|
129
|
0 |
0 |
if ($script =~ /^(pre-commit|post-commit)$/) { }
|
|
|
0 |
0 |
elsif (@$argv and $$argv[0] =~ /^[\w\-]+$/) { }
|
|
|
0 |
0 |
elsif (not @$argv) { }
|
|
173
|
0 |
0 |
if $self->config->is_init
|
|
178
|
0 |
0 |
unless (-e $config_file)
|
|
258
|
0 |
0 |
if $self->config->server_port
|
|
291
|
0 |
0 |
unless chdir $app_root
|