|
Lines 169-175
if ( $action eq 'create' ) {
Link Here
|
| 169 |
$verification_token = md5_hex( time().{}.rand().{}.$$ ); |
169 |
$verification_token = md5_hex( time().{}.rand().{}.$$ ); |
| 170 |
} |
170 |
} |
| 171 |
|
171 |
|
| 172 |
$borrower{password} = Koha::AuthUtils::generate_password; |
172 |
$borrower{password} = Koha::AuthUtils::generate_password unless $borrower{password}; |
| 173 |
$borrower{verification_token} = $verification_token; |
173 |
$borrower{verification_token} = $verification_token; |
| 174 |
|
174 |
|
| 175 |
Koha::Patron::Modification->new( \%borrower )->store(); |
175 |
Koha::Patron::Modification->new( \%borrower )->store(); |
| 176 |
- |
|
|