View | Details | Raw Unified | Return to bug 41895
Collapse All | Expand All

(-)a/C4/Context.pm (-4 / +1 lines)
Lines 21-28 use Modern::Perl; Link Here
21
21
22
use vars qw($AUTOLOAD $context);
22
use vars qw($AUTOLOAD $context);
23
23
24
our $REQUEST_ENV;
25
26
BEGIN {
24
BEGIN {
27
    if ( $ENV{'HTTP_USER_AGENT'} ) {    # Only hit when plack is not enabled
25
    if ( $ENV{'HTTP_USER_AGENT'} ) {    # Only hit when plack is not enabled
28
26
Lines 649-655 Retrieves a hash for user environment variables. Link Here
649
=cut
647
=cut
650
648
651
sub userenv {
649
sub userenv {
652
    return Koha::Context::UserEnv->get_all();
650
    return Koha::Context::UserEnv->get_all() if Koha::Context::UserEnv->exists();
653
}
651
}
654
652
655
=head2 set_userenv_from_session
653
=head2 set_userenv_from_session
656
- 

Return to bug 41895