From 228f07a5cf58f1f49ed1e17ccf53d8dab71592e7 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 22 May 2024 10:08:30 +0200 Subject: [PATCH] Bug 36816: Remove warning Content-Type: text/plain; charset=utf-8 Use of uninitialized value in string eq at /kohadevbox/koha/opac/opac-memberentry.pl line 629. Signed-off-by: Pedro Amorim Signed-off-by: Marcel de Rooy --- opac/opac-memberentry.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/opac/opac-memberentry.pl b/opac/opac-memberentry.pl index cc350990d2..7adc381d47 100755 --- a/opac/opac-memberentry.pl +++ b/opac/opac-memberentry.pl @@ -615,11 +615,11 @@ sub FilterUnchangedAttributes { # Loop through the current patron attributes foreach my $attribute_type ( keys %{ $patron_attribute_types } ) { - if ( $patron_attribute_types->{ $attribute_type } != $passed_attribute_types->{ $attribute_type } ) { + if ( ( $patron_attribute_types->{$attribute_type} // q{} ) ne ( $passed_attribute_types->{$attribute_type} // q{} ) ) { # count differs, overwrite all attributes for given type - foreach my $attr (@{ $entered_attributes }) { + foreach my $attr ( @{$entered_attributes} ) { push @changed_attributes, $attr - if $attr->{ code } eq $attribute_type; + if $attr->{code} eq $attribute_type; } } else { # count matches, check values -- 2.30.2