Lines 44-49
use Koha;
Link Here
|
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::BiblioFrameworks; |
|
|
47 |
use Koha::Email; |
47 |
use Koha::Patron::Categories; |
48 |
use Koha::Patron::Categories; |
48 |
use Koha::Patrons; |
49 |
use Koha::Patrons; |
49 |
use Koha::Caches; |
50 |
use Koha::Caches; |
Lines 196-201
my $warnPrefAnonymousPatronAnonSuggestions_PatronDoesNotExist = ( $AnonymousPatr
Link Here
|
196 |
|
197 |
|
197 |
my $warnPrefAnonymousPatronOPACPrivacy_PatronDoesNotExist = ( not $anonymous_patron and Koha::Patrons->search({ privacy => 2 })->count ); |
198 |
my $warnPrefAnonymousPatronOPACPrivacy_PatronDoesNotExist = ( not $anonymous_patron and Koha::Patrons->search({ privacy => 2 })->count ); |
198 |
|
199 |
|
|
|
200 |
my $warnPrefKohaAdminEmailAddress = not Email::Valid->address(C4::Context->preference('KohaAdminEmailAddress')); |
201 |
|
199 |
my $errZebraConnection = C4::Context->Zconn("biblioserver",0)->errcode(); |
202 |
my $errZebraConnection = C4::Context->Zconn("biblioserver",0)->errcode(); |
200 |
|
203 |
|
201 |
my $warnIsRootUser = (! $loggedinuser); |
204 |
my $warnIsRootUser = (! $loggedinuser); |
Lines 571-576
$template->param(
Link Here
|
571 |
warnPrefAnonymousPatronAnonSuggestions => $warnPrefAnonymousPatronAnonSuggestions, |
574 |
warnPrefAnonymousPatronAnonSuggestions => $warnPrefAnonymousPatronAnonSuggestions, |
572 |
warnPrefAnonymousPatronOPACPrivacy_PatronDoesNotExist => $warnPrefAnonymousPatronOPACPrivacy_PatronDoesNotExist, |
575 |
warnPrefAnonymousPatronOPACPrivacy_PatronDoesNotExist => $warnPrefAnonymousPatronOPACPrivacy_PatronDoesNotExist, |
573 |
warnPrefAnonymousPatronAnonSuggestions_PatronDoesNotExist => $warnPrefAnonymousPatronAnonSuggestions_PatronDoesNotExist, |
576 |
warnPrefAnonymousPatronAnonSuggestions_PatronDoesNotExist => $warnPrefAnonymousPatronAnonSuggestions_PatronDoesNotExist, |
|
|
577 |
warnPrefKohaAdminEmailAddress => $warnPrefKohaAdminEmailAddress, |
574 |
errZebraConnection => $errZebraConnection, |
578 |
errZebraConnection => $errZebraConnection, |
575 |
warnIsRootUser => $warnIsRootUser, |
579 |
warnIsRootUser => $warnIsRootUser, |
576 |
warnNoActiveCurrency => $warnNoActiveCurrency, |
580 |
warnNoActiveCurrency => $warnNoActiveCurrency, |