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

(-)a/C4/Context.pm (-2 / +3 lines)
Lines 1097-1103 set_userenv is called in Auth.pm Link Here
1097
1097
1098
#'
1098
#'
1099
sub set_userenv {
1099
sub set_userenv {
1100
    my ($usernum, $userid, $usercnum, $userfirstname, $usersurname, $userbranch, $branchname, $userflags, $emailaddress, $branchprinter, $persona, $shibboleth)= @_;
1100
    my ($usernum, $userid, $usercnum, $userfirstname, $usersurname, $userbranch, $branchname, $userflags, $emailaddress, $branchprinter, $persona, $shibboleth)=
1101
    map { Encode::is_utf8( $_ ) ? $_ : Encode::decode('UTF-8', $_) } # CGI::Session doesn't handle utf-8, so we decode it here
1102
    @_;
1101
    my $var=$context->{"activeuser"} || '';
1103
    my $var=$context->{"activeuser"} || '';
1102
    my $cell = {
1104
    my $cell = {
1103
        "number"     => $usernum,
1105
        "number"     => $usernum,
1104
- 

Return to bug 11944