|
Lines 20-25
package Koha::AdditionalContents;
Link Here
|
| 20 |
use Modern::Perl; |
20 |
use Modern::Perl; |
| 21 |
|
21 |
|
| 22 |
use Array::Utils qw( array_minus ); |
22 |
use Array::Utils qw( array_minus ); |
|
|
23 |
use Data::Dumper; |
| 23 |
|
24 |
|
| 24 |
use Koha::Database; |
25 |
use Koha::Database; |
| 25 |
use Koha::Exceptions; |
26 |
use Koha::Exceptions; |
|
Lines 83-89
sub search_for_display {
Link Here
|
| 83 |
my $search_params; |
84 |
my $search_params; |
| 84 |
$search_params->{location} = $params->{location}; |
85 |
$search_params->{location} = $params->{location}; |
| 85 |
$search_params->{branchcode} = $params->{library_id} ? [ $params->{library_id}, undef ] : undef; |
86 |
$search_params->{branchcode} = $params->{library_id} ? [ $params->{library_id}, undef ] : undef; |
| 86 |
$search_params->{published_on} = { '<=' => \'CAST(NOW() AS DATE)' }; |
87 |
$params->{category} && $params->{category} eq 'news' |
|
|
88 |
? $search_params->{published_on} = { '<=' => \'CAST(NOW() AS DATE)' } |
| 89 |
: $search_params->{-or} = [ |
| 90 |
published_on => { '<=' => \'CAST(NOW() AS DATE)' }, |
| 91 |
published_on => { '=' => \'NULL' } |
| 92 |
]; |
| 87 |
$search_params->{expirationdate} = [ '-or', { '>=' => \'CAST(NOW() AS DATE)' }, undef ]; |
93 |
$search_params->{expirationdate} = [ '-or', { '>=' => \'CAST(NOW() AS DATE)' }, undef ]; |
| 88 |
$search_params->{category} = $params->{category} if $params->{category}; |
94 |
$search_params->{category} = $params->{category} if $params->{category}; |
| 89 |
$search_params->{lang} = 'default' if !$lang || $lang eq 'default'; |
95 |
$search_params->{lang} = 'default' if !$lang || $lang eq 'default'; |
| 90 |
- |
|
|