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

(-)a/opac/sco/sco-main.pl (-3 / +4 lines)
Lines 65-73 if (C4::Context->preference('AutoSelfCheckAllowed')) Link Here
65
{
65
{
66
    my $AutoSelfCheckID = C4::Context->preference('AutoSelfCheckID');
66
    my $AutoSelfCheckID = C4::Context->preference('AutoSelfCheckID');
67
    my $AutoSelfCheckPass = C4::Context->preference('AutoSelfCheckPass');
67
    my $AutoSelfCheckPass = C4::Context->preference('AutoSelfCheckPass');
68
    $query->param(-name=>'userid',-values=>[$AutoSelfCheckID]);
68
    $ENV{REQUEST_METHOD} = 'POST';
69
    $query->param(-name=>'password',-values=>[$AutoSelfCheckPass]);
69
    $query->param(-name=>'login_userid',-values=>[$AutoSelfCheckID]);
70
    $query->param(-name=>'login_password',-values=>[$AutoSelfCheckPass]);
70
    $query->param(-name=>'koha_login_context',-values=>['sco']);
71
    $query->param(-name=>'koha_login_context',-values=>['sco']);
72
    $query->param(-name=>'op',-values=>['cud-login']);
71
}
73
}
72
$query->param(-name=>'sco_user_login',-values=>[1]);
74
$query->param(-name=>'sco_user_login',-values=>[1]);
73
75
74
- 

Return to bug 36349