Lines 43-48
use C4::Installer::PerlModules;
Link Here
|
43 |
use Koha; |
43 |
use Koha; |
44 |
use Koha::DateUtils qw(dt_from_string output_pref); |
44 |
use Koha::DateUtils qw(dt_from_string output_pref); |
45 |
use Koha::Acquisition::Currencies; |
45 |
use Koha::Acquisition::Currencies; |
|
|
46 |
use Koha::BiblioFrameworks; |
46 |
use Koha::Patron::Categories; |
47 |
use Koha::Patron::Categories; |
47 |
use Koha::Patrons; |
48 |
use Koha::Patrons; |
48 |
use Koha::Caches; |
49 |
use Koha::Caches; |
Lines 50-55
use Koha::Config::SysPrefs;
Link Here
|
50 |
use Koha::Illrequest::Config; |
51 |
use Koha::Illrequest::Config; |
51 |
use Koha::SearchEngine::Elasticsearch; |
52 |
use Koha::SearchEngine::Elasticsearch; |
52 |
use Koha::Logger; |
53 |
use Koha::Logger; |
|
|
54 |
use Koha::Filter::MARC::ViewPolicy; |
53 |
|
55 |
|
54 |
use C4::Members::Statistics; |
56 |
use C4::Members::Statistics; |
55 |
|
57 |
|
Lines 525-530
$template->param( 'bad_yaml_prefs' => \@bad_yaml_prefs ) if @bad_yaml_prefs;
Link Here
|
525 |
and not C4::Context->config('bcrypt_settings'); |
527 |
and not C4::Context->config('bcrypt_settings'); |
526 |
} |
528 |
} |
527 |
|
529 |
|
|
|
530 |
{ |
531 |
my @frameworkcodes = Koha::BiblioFrameworks->search->get_column('frameworkcode'); |
532 |
my @hidden_biblionumbers; |
533 |
push @frameworkcodes, ""; # it's not in the biblio_frameworks table! |
534 |
for my $frameworkcode ( @frameworkcodes ) { |
535 |
my $shouldhidemarc_opac = Koha::Filter::MARC::ViewPolicy->should_hide_marc( |
536 |
{ |
537 |
frameworkcode => $frameworkcode, |
538 |
interface => "opac" |
539 |
} |
540 |
); |
541 |
push @hidden_biblionumbers, { frameworkcode => $frameworkcode, interface => 'opac' } |
542 |
if $shouldhidemarc_opac->{biblionumber}; |
543 |
|
544 |
my $shouldhidemarc_intranet = Koha::Filter::MARC::ViewPolicy->should_hide_marc( |
545 |
{ |
546 |
frameworkcode => $frameworkcode, |
547 |
interface => "intranet" |
548 |
} |
549 |
); |
550 |
push @hidden_biblionumbers, { frameworkcode => $frameworkcode, interface => 'intranet' } |
551 |
if $shouldhidemarc_intranet->{biblionumber}; |
552 |
} |
553 |
$template->param( warnHiddenBiblionumbers => \@hidden_biblionumbers ); |
554 |
} |
555 |
|
528 |
my %versions = C4::Context::get_versions(); |
556 |
my %versions = C4::Context::get_versions(); |
529 |
|
557 |
|
530 |
$template->param( |
558 |
$template->param( |