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

(-)a/svc/config/systempreferences (-1 / +12 lines)
Lines 24-29 use C4::Context; Link Here
24
use C4::Service;
24
use C4::Service;
25
use C4::Log;
25
use C4::Log;
26
use Koha::Token;
26
use Koha::Token;
27
use CGI::Cookie;
28
use C4::Auth qw( get_session );
27
29
28
=head1 NAME
30
=head1 NAME
29
31
Lines 135-140 sub set_preferences { Link Here
135
    C4::Service->return_success($response);
137
    C4::Service->return_success($response);
136
}
138
}
137
139
140
my %cookies = CGI::Cookie->fetch;
141
142
if ( exists $cookies{'CGISESSID'} ) {
143
    my $sessionID = $cookies{'CGISESSID'}->value;
144
    if ($sessionID) {
145
        my $session = get_session($sessionID);
146
        C4::Context->interface( $session->param('interface') ) if ($session);
147
    }
148
}
149
138
C4::Service->dispatch(
150
C4::Service->dispatch(
139
    [ 'POST /([A-Za-z0-9_-]+)', ['value'], \&set_preference ],
151
    [ 'POST /([A-Za-z0-9_-]+)', ['value'], \&set_preference ],
140
    [ 'POST /',                 [],        \&set_preferences ],
152
    [ 'POST /',                 [],        \&set_preferences ],
141
- 

Return to bug 42084