Bug 24964: Fix perl critic warning

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Kyle M Hall 2020-03-26 08:53:59 -04:00 committed by Martin Renvoize
parent 693d56d0e9
commit a5576f62eb
No known key found for this signature in database
GPG Key ID: 422B469130441A0F
1 changed files with 1 additions and 1 deletions

View File

@ -172,7 +172,7 @@ sub search {
push @where_args, ($has_permission->{module_bit}) x 2, $has_permission->{subpermission};
}
my $where = " WHERE " . join (" AND ", @where_strs) if @where_strs;
my $where = @where_strs ? " WHERE " . join (" AND ", @where_strs) : undef;
my $orderby = dt_build_orderby($dt_params);
my $limit;