| line |
true |
false |
branch |
|
60
|
0 |
0 |
unless ($app_class->can('new'))
|
|
61
|
0 |
0 |
unless eval "use $app_class; 1"
|
|
64
|
0 |
0 |
unless $app_class->isa('Cog::App') and $app_class ne 'Cog::App'
|
|
75
|
0 |
0 |
unless UNIVERSAL::can($config_class, 'new')
|
|
80
|
0 |
0 |
-e $config_file ? :
|
|
84
|
0 |
0 |
if ($app_class ne ref $self)
|
|
85
|
0 |
0 |
unless eval "require $app_class; 1"
|
|
107
|
0 |
0 |
unless my $function = $self->can($method)
|
|
110
|
0 |
0 |
if ($action ne 'init')
|
|
111
|
0 |
0 |
unless $self->config_file
|
|
127
|
0 |
0 |
if ($script =~ /^(pre-commit|post-commit)$/) { }
|
|
|
0 |
0 |
elsif (@$argv and $$argv[0] =~ /^[\w\-]+$/) { }
|
|
|
0 |
0 |
elsif (not @$argv) { }
|
|
171
|
0 |
0 |
if $self->config->is_init
|
|
176
|
0 |
0 |
unless (-e $config_file)
|
|
256
|
0 |
0 |
if $self->config->server_port
|
|
289
|
0 |
0 |
unless chdir $app_root
|