Lines 194-201
sub store {
Link Here
|
194 |
$self->trim_whitespaces; |
194 |
$self->trim_whitespaces; |
195 |
|
195 |
|
196 |
# Set surname to uppercase if uppercasesurname is true |
196 |
# Set surname to uppercase if uppercasesurname is true |
197 |
$self->surname( uc($self->surname) ) |
197 |
$self->surname( uc($self->surname) ) |
198 |
if C4::Context->preference("uppercasesurname"); |
198 |
if C4::Context->preference("uppercasesurname"); |
199 |
|
199 |
|
200 |
unless ( $self->in_storage ) { #AddMember |
200 |
unless ( $self->in_storage ) { #AddMember |
201 |
|
201 |
|
202 |
- |
|
|