projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 14224: Improve escaped characters
[koha.git]
/
C4
/
Context.pm
diff --git
a/C4/Context.pm
b/C4/Context.pm
index
c9d9617
..
a50ddfd
100644
(file)
--- a/
C4/Context.pm
+++ b/
C4/Context.pm
@@
-401,7
+401,7
@@
with this method.
=cut
=cut
-my $syspref_cache;
+my $syspref_cache
= Koha::Caches->get_instance('syspref')
;
my $use_syspref_cache = 1;
sub preference {
my $self = shift;
my $use_syspref_cache = 1;
sub preference {
my $self = shift;
@@
-847,7
+847,7
@@
sub userenv {
C4::Context->set_userenv($usernum, $userid, $usercnum,
$userfirstname, $usersurname,
$userbranch, $branchname, $userflags,
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.
Establish a hash of user environment variables.
@@
-858,7
+858,7
@@
set_userenv is called in Auth.pm
#'
sub set_userenv {
shift @_;
#'
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"} || '';
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,
"flags" => $userflags,
"emailaddress" => $emailaddress,
"branchprinter" => $branchprinter,
- "persona" => $persona,
"shibboleth" => $shibboleth,
};
$context->{userenv}->{$var} = $cell;
"shibboleth" => $shibboleth,
};
$context->{userenv}->{$var} = $cell;