Lines 1066-1072
sub checkauth {
Link Here
|
1066 |
C4::Context->_unset_userenv($sessionID); |
1066 |
C4::Context->_unset_userenv($sessionID); |
1067 |
} |
1067 |
} |
1068 |
my ( $borrowernumber, $firstname, $surname, $userflags, |
1068 |
my ( $borrowernumber, $firstname, $surname, $userflags, |
1069 |
$branchcode, $branchname, $emailaddress ); |
1069 |
$branchcode, $branchname, $emailaddress, $desk_id, $desk_name ); |
1070 |
|
1070 |
|
1071 |
if ( $return == 1 ) { |
1071 |
if ( $return == 1 ) { |
1072 |
my $select = " |
1072 |
my $select = " |
Lines 1110-1115
sub checkauth {
Link Here
|
1110 |
my $library = Koha::Libraries->find($branchcode); |
1110 |
my $library = Koha::Libraries->find($branchcode); |
1111 |
$branchname = $library? $library->branchname: ''; |
1111 |
$branchname = $library? $library->branchname: ''; |
1112 |
} |
1112 |
} |
|
|
1113 |
if ( $query->param('desk_id') ) { |
1114 |
$desk_id = $query->param('desk_id'); |
1115 |
my $desk = Koha::Desks->find($desk_id); |
1116 |
$desk_name = $desk ? $desk->desk_name : ''; |
1117 |
} |
1113 |
my $branches = { map { $_->branchcode => $_->unblessed } Koha::Libraries->search }; |
1118 |
my $branches = { map { $_->branchcode => $_->unblessed } Koha::Libraries->search }; |
1114 |
if ( $type ne 'opac' and C4::Context->boolean_preference('AutoLocation') ) { |
1119 |
if ( $type ne 'opac' and C4::Context->boolean_preference('AutoLocation') ) { |
1115 |
|
1120 |
|
Lines 1145-1150
sub checkauth {
Link Here
|
1145 |
$session->param( 'surname', $surname ); |
1150 |
$session->param( 'surname', $surname ); |
1146 |
$session->param( 'branch', $branchcode ); |
1151 |
$session->param( 'branch', $branchcode ); |
1147 |
$session->param( 'branchname', $branchname ); |
1152 |
$session->param( 'branchname', $branchname ); |
|
|
1153 |
$session->param( 'desk_id', $desk_id); |
1154 |
$session->param( 'desk_name', $desk_name); |
1148 |
$session->param( 'flags', $userflags ); |
1155 |
$session->param( 'flags', $userflags ); |
1149 |
$session->param( 'emailaddress', $emailaddress ); |
1156 |
$session->param( 'emailaddress', $emailaddress ); |
1150 |
$session->param( 'ip', $session->remote_addr() ); |
1157 |
$session->param( 'ip', $session->remote_addr() ); |
Lines 1160-1166
sub checkauth {
Link Here
|
1160 |
$session->param('surname'), $session->param('branch'), |
1167 |
$session->param('surname'), $session->param('branch'), |
1161 |
$session->param('branchname'), $session->param('flags'), |
1168 |
$session->param('branchname'), $session->param('flags'), |
1162 |
$session->param('emailaddress'), $session->param('shibboleth'), |
1169 |
$session->param('emailaddress'), $session->param('shibboleth'), |
1163 |
$session->param('desk_id'), $session->param('desk_name') |
1170 |
$session->param('desk_id'), $session->param('desk_name') |
1164 |
); |
1171 |
); |
1165 |
|
1172 |
|
1166 |
} |
1173 |
} |