From c7ac20e915b9d5df106482f9f01b269d7c272a2b Mon Sep 17 00:00:00 2001 From: Colin Campbell Date: Thu, 25 Oct 2018 10:06:43 +0100 Subject: [PATCH] Bug 21658 Define string to avoid run time warnings In addition to an explicit error a renewal may be rejected because a fee is due and has not yet been flagged as paid. In this case define the error message as empty string to avoid runtime errors in the regexes performed on the standard error messages Signed-off-by: Liz Rea Signed-off-by: Liz Rea --- C4/SIP/ILS/Transaction/Renew.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/C4/SIP/ILS/Transaction/Renew.pm b/C4/SIP/ILS/Transaction/Renew.pm index af96f93901..229b3a2c04 100644 --- a/C4/SIP/ILS/Transaction/Renew.pm +++ b/C4/SIP/ILS/Transaction/Renew.pm @@ -40,6 +40,8 @@ sub do_renew_for { $self->{fee_amount} = sprintf '%.2f',$fee; if ($self->{fee_ack} eq 'N') { $renewokay = 0; + $renewerror = q{}; # define error string to avoid runtime warnings + # in regexes below } } -- 2.11.0