Lines 247-255
elsif ( $action eq 'update' ) {
Link Here
|
247 |
my %borrower = ParseCgiForBorrower($cgi); |
247 |
my %borrower = ParseCgiForBorrower($cgi); |
248 |
$borrower{borrowernumber} = $borrowernumber; |
248 |
$borrower{borrowernumber} = $borrowernumber; |
249 |
|
249 |
|
250 |
my %borrower_changes = DelEmptyFields(%borrower); |
|
|
251 |
my @empty_mandatory_fields = |
250 |
my @empty_mandatory_fields = |
252 |
CheckMandatoryFields( \%borrower_changes, $action ); |
251 |
CheckMandatoryFields( \%borrower, $action ); |
253 |
my $invalidformfields = CheckForInvalidFields(\%borrower); |
252 |
my $invalidformfields = CheckForInvalidFields(\%borrower); |
254 |
|
253 |
|
255 |
# Send back the data to the template |
254 |
# Send back the data to the template |
Lines 270-275
elsif ( $action eq 'update' ) {
Link Here
|
270 |
} |
269 |
} |
271 |
else { |
270 |
else { |
272 |
my %borrower_changes = DelUnchangedFields( $borrowernumber, %borrower ); |
271 |
my %borrower_changes = DelUnchangedFields( $borrowernumber, %borrower ); |
|
|
272 |
$borrower_changes{'changed_fields'} = join ',', keys %borrower_changes; |
273 |
my $extended_attributes_changes = FilterUnchangedAttributes( $borrowernumber, $attributes ); |
273 |
my $extended_attributes_changes = FilterUnchangedAttributes( $borrowernumber, $attributes ); |
274 |
|
274 |
|
275 |
if ( %borrower_changes || scalar @{$extended_attributes_changes} > 0 ) { |
275 |
if ( %borrower_changes || scalar @{$extended_attributes_changes} > 0 ) { |
276 |
- |
|
|