From c192f0b006a60bac327f9887caf5cac498fb7338 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Fri, 20 Sep 2024 09:07:42 +0000 Subject: [PATCH] Bug 37892: (QA follow-up) Fix condition in memberentry Content-Type: text/plain; charset=utf-8 Patron may be undefined. So the test may crash. Also there is an issue with operator precedence. --- members/memberentry.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/members/memberentry.pl b/members/memberentry.pl index 0d09b16bbd..7b9788f20f 100755 --- a/members/memberentry.pl +++ b/members/memberentry.pl @@ -285,7 +285,9 @@ if ( ( $op eq 'cud-save' || $op eq 'cud-insert' ) } foreach my $guarantor (@guarantors) { - if ( ( $op eq 'cud-save' || $op eq 'cud-insert' ) && ($guarantor->is_child ) || $guarantor->is_guarantee || $patron->is_guarantor) { + if ( ( $op eq 'cud-save' || $op eq 'cud-insert' ) + && ( $guarantor->is_child || $guarantor->is_guarantee || ( $patron && $patron->is_guarantor ) ) ) + { push @errors, 'ERROR_guarantor_is_guarantee'; } } -- 2.30.2