Lines 63-68
if ( ( $member ne $loggedinuser ) && ( $bor->{'category_type'} eq 'S' ) ) {
Link Here
|
63 |
push( @errors, 'NOMATCH' ) if ( ( $newpassword && $newpassword2 ) && ( $newpassword ne $newpassword2 ) ); |
63 |
push( @errors, 'NOMATCH' ) if ( ( $newpassword && $newpassword2 ) && ( $newpassword ne $newpassword2 ) ); |
64 |
|
64 |
|
65 |
my $minpw = C4::Context->preference('minPasswordLength'); |
65 |
my $minpw = C4::Context->preference('minPasswordLength'); |
|
|
66 |
$minpw = 3 if not $minpw or $minpw < 3; |
66 |
push( @errors, 'SHORTPASSWORD' ) if ( $newpassword && $minpw && ( length($newpassword) < $minpw ) ); |
67 |
push( @errors, 'SHORTPASSWORD' ) if ( $newpassword && $minpw && ( length($newpassword) < $minpw ) ); |
67 |
|
68 |
|
68 |
if ( $newpassword && !scalar(@errors) ) { |
69 |
if ( $newpassword && !scalar(@errors) ) { |
Lines 136-142
$template->param(
Link Here
|
136 |
destination => $destination, |
137 |
destination => $destination, |
137 |
is_child => ( $bor->{'category_type'} eq 'C' ), |
138 |
is_child => ( $bor->{'category_type'} eq 'C' ), |
138 |
activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), |
139 |
activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), |
139 |
minPasswordLength => $minpw, |
|
|
140 |
RoutingSerials => C4::Context->preference('RoutingSerials'), |
140 |
RoutingSerials => C4::Context->preference('RoutingSerials'), |
141 |
csrf_token => Koha::Token->new->generate_csrf({ |
141 |
csrf_token => Koha::Token->new->generate_csrf({ |
142 |
id => Encode::encode( 'UTF-8', C4::Context->userenv->{id} ), |
142 |
id => Encode::encode( 'UTF-8', C4::Context->userenv->{id} ), |