Lines 277-283
$newdata{'lang'} = $input->param('lang') if defined($input->param('lang'))
Link Here
|
277 |
|
277 |
|
278 |
# builds default userid |
278 |
# builds default userid |
279 |
# userid input text may be empty or missing because of syspref BorrowerUnwantedField |
279 |
# userid input text may be empty or missing because of syspref BorrowerUnwantedField |
280 |
if ( ( defined $newdata{'userid'} && $newdata{'userid'} eq '' ) || $check_BorrowerUnwantedField =~ /userid/ ) { |
280 |
if ( ( defined $newdata{'userid'} && $newdata{'userid'} eq '' ) || $check_BorrowerUnwantedField =~ /userid/ && !defined $data{'userid'} ) { |
281 |
if ( ( defined $newdata{'firstname'} ) && ( defined $newdata{'surname'} ) ) { |
281 |
if ( ( defined $newdata{'firstname'} ) && ( defined $newdata{'surname'} ) ) { |
282 |
# Full page edit, firstname and surname input zones are present |
282 |
# Full page edit, firstname and surname input zones are present |
283 |
$newdata{'userid'} = Generate_Userid( $borrowernumber, $newdata{'firstname'}, $newdata{'surname'} ); |
283 |
$newdata{'userid'} = Generate_Userid( $borrowernumber, $newdata{'firstname'}, $newdata{'surname'} ); |
284 |
- |
|
|