X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=C4%2FContext.pm;h=a50ddfda5a1c205154784f5eb1c6638d9ca8bc44;hb=3ee3cf10e61aaad8a47881fdc6cc565e74c847af;hp=1866b1d85f7f8607b2fbc1edc605dee2b04a31aa;hpb=27b756eb91e0ce93f46233dabe3957a66e978d4d;p=koha.git diff --git a/C4/Context.pm b/C4/Context.pm index 1866b1d85f..a50ddfda5a 100644 --- a/C4/Context.pm +++ b/C4/Context.pm @@ -413,7 +413,7 @@ sub preference { $var = lc $var; if ($use_syspref_cache) { - $syspref_cache = Koha::Cache->get_instance() unless $syspref_cache; + $syspref_cache = Koha::Caches->get_instance('syspref') unless $syspref_cache; my $cached_var = $syspref_cache->get_from_cache("syspref_$var"); return $cached_var if defined $cached_var; } @@ -847,7 +847,7 @@ sub userenv { C4::Context->set_userenv($usernum, $userid, $usercnum, $userfirstname, $usersurname, $userbranch, $branchname, $userflags, - $emailaddress, $branchprinter, $persona); + $emailaddress, $branchprinter, $shibboleth); Establish a hash of user environment variables. @@ -858,7 +858,7 @@ set_userenv is called in Auth.pm #' sub set_userenv { shift @_; - my ($usernum, $userid, $usercnum, $userfirstname, $usersurname, $userbranch, $branchname, $userflags, $emailaddress, $branchprinter, $persona, $shibboleth)= + my ($usernum, $userid, $usercnum, $userfirstname, $usersurname, $userbranch, $branchname, $userflags, $emailaddress, $branchprinter, $shibboleth)= map { Encode::is_utf8( $_ ) ? $_ : Encode::decode('UTF-8', $_) } # CGI::Session doesn't handle utf-8, so we decode it here @_; my $var=$context->{"activeuser"} || ''; @@ -874,7 +874,6 @@ sub set_userenv { "flags" => $userflags, "emailaddress" => $emailaddress, "branchprinter" => $branchprinter, - "persona" => $persona, "shibboleth" => $shibboleth, }; $context->{userenv}->{$var} = $cell;