line |
true |
false |
branch |
60
|
0 |
4 |
unless defined $class |
61
|
0 |
4 |
unless defined $name |
67
|
0 |
0 |
if (defined $val) |
72
|
0 |
0 |
unless (defined $$self{$name}) |
75
|
0 |
0 |
if (defined ${"${class}::$name";}) |
89
|
0 |
0 |
if (defined $tmpl) |
93
|
0 |
0 |
unless ($$self{'_mdw_search_tmpl'}) |
95
|
0 |
0 |
unless $ENV{'HTML_TEMPLATE_ROOT'} |
98
|
0 |
0 |
if DEBUG() |
101
|
0 |
0 |
unless -f $abs |
114
|
0 |
0 |
if (defined $tmpl) |
117
|
0 |
0 |
unless ($$self{'_mdw_search_results_tmpl'}) |
121
|
0 |
0 |
if DEBUG() |
175
|
0 |
0 |
unless $prepend |
181
|
0 |
0 |
unless my(@a) = $self->query->param("${prepend}_attribute") |
185
|
0 |
0 |
unless (defined @a and scalar @a) |
195
|
0 |
0 |
unless defined $val and $val =~ /\w/ |
198
|
0 |
0 |
unless $type |
208
|
0 |
0 |
unless %h |
228
|
0 |
0 |
if ($count > $limit) |
252
|
0 |
0 |
unless ($_ =~ /_path$/) |
289
|
0 |
0 |
unless ($$self{'_mdsearch_object'}) |
292
|
0 |
0 |
unless $dbh |
295
|
0 |
0 |
unless $$self{'_mdsearch_object'} = 'Metadata::DB::Search'->new({'DBH', $self->param('DBH')}) |
306
|
0 |
0 |
unless my $search_args = $self->mdw_search_args_submitted |
310
|
0 |
0 |
unless my $mds = $self->mds_object |
314
|
0 |
0 |
unless ($mds->search($search_args)) |