Lines 193-203
sub store {
Link Here
|
193 |
|
193 |
|
194 |
$self->trim_whitespaces; |
194 |
$self->trim_whitespaces; |
195 |
|
195 |
|
196 |
unless ( $self->in_storage ) { #AddMember |
196 |
# Set surname to uppercase if uppercasesurname is true |
|
|
197 |
$self->surname( uc($self->surname) ) |
198 |
if C4::Context->preference("uppercasesurname"); |
197 |
|
199 |
|
198 |
# Set surname to uppercase if uppercasesurname is true |
200 |
unless ( $self->in_storage ) { #AddMember |
199 |
$self->surname = uc($self->surname) |
|
|
200 |
if C4::Context->preference("uppercasesurname"); |
201 |
|
201 |
|
202 |
# Generate a valid userid/login if needed |
202 |
# Generate a valid userid/login if needed |
203 |
$self->generate_userid |
203 |
$self->generate_userid |