Lines 340-346
elsif ( $op eq 'cud-update' ) {
Link Here
|
340 |
$borrower_changes{'changed_fields'} = join ',', keys %borrower_changes; |
340 |
$borrower_changes{'changed_fields'} = join ',', keys %borrower_changes; |
341 |
my $extended_attributes_changes = FilterUnchangedAttributes( $borrowernumber, $attributes ); |
341 |
my $extended_attributes_changes = FilterUnchangedAttributes( $borrowernumber, $attributes ); |
342 |
|
342 |
|
343 |
if ( %borrower_changes || scalar @{$extended_attributes_changes} > 0 ) { |
343 |
if ( $borrower_changes{'changed_fields'} || scalar @{$extended_attributes_changes} > 0 ) { |
344 |
( $template, $borrowernumber, $cookie ) = get_template_and_user( |
344 |
( $template, $borrowernumber, $cookie ) = get_template_and_user( |
345 |
{ |
345 |
{ |
346 |
template_name => "opac-memberentry-update-submitted.tt", |
346 |
template_name => "opac-memberentry-update-submitted.tt", |
Lines 577-586
sub DelUnchangedFields {
Link Here
|
577 |
|
577 |
|
578 |
|
578 |
|
579 |
foreach my $key ( keys %new_data ) { |
579 |
foreach my $key ( keys %new_data ) { |
580 |
next if defined($new_data{$key}) xor defined($current_data->{$key}); |
580 |
next if ( ($new_data{$key} || $current_data->{$key}) && ( $new_data{$key} ne $current_data->{$key} ) && !($hidden_fields->{$key}) ); |
581 |
if ( !defined($new_data{$key}) || $current_data->{$key} eq $new_data{$key} || $hidden_fields->{$key} ) { |
581 |
delete $new_data{$key}; |
582 |
delete $new_data{$key}; |
|
|
583 |
} |
584 |
} |
582 |
} |
585 |
|
583 |
|
586 |
return %new_data; |
584 |
return %new_data; |
587 |
- |
|
|