Attachment 90085 Details for Bug 20537 – Bug 20537: Added checks to remove warning from overdue_notices.pl

[patch] Bug 20537: Added checks to remove warning from overdue_notices.pl

Bug-20537-Added-checks-to-remove-warning-from-over.patch (text/plain), 1.88 KB, created by Liz Rea on 2019-05-24 19:54:20 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Liz Rea

Created: 2019-05-24 19:54:20 UTC

Size: 1.88 KB

patch

obsolete

>From a24efd88e7bf219b71e62f2df9d50622ae1d0f43 Mon Sep 17 00:00:00 2001
>From: Hayley Mapley <hayleymapley@catalyst.net.nz>
>Date: Fri, 24 May 2019 13:52:58 -0500
>Subject: [PATCH] Bug 20537: Added checks to remove warning from
> overdue_notices.pl
>
>When executing overdue_notices.pl on borrowers that lack a surname, we
>see this error:
>Use of uninitialized value in concatenation (.) or string at
>/usr/share/koha/bin/cronjobs/overdue_notices.pl line 575.
>
>This patch fixes this issue by setting the $borr variable
>based on the information that has been defined.
>
>To test:
>1) Create a borrower and set its surname to null
>2) Checkout an item to the borrower and set it to be overdue
>3) Navigate to kohaclone/misc/cronjobs and enter a koha-shell
>4) Run the script: ./overdue_notices.pl
>5) Observe the error appears
>6) Apply the patch
>7) Repeat steps 3-4
>8) Observe the error is gone
>9) Sign off!
>
>Sponsored-by: Catalyst IT
>
>Signed-off-by: Liz Rea <wizzyrea@gmail.com>
>---
> misc/cronjobs/overdue_notices.pl | 9 +++++----
> 1 file changed, 5 insertions(+), 4 deletions(-)
>
>diff --git a/misc/cronjobs/overdue_notices.pl b/misc/cronjobs/overdue_notices.pl
>index 1529e779ac..b1b6239973 100755
>--- a/misc/cronjobs/overdue_notices.pl
>+++ b/misc/cronjobs/overdue_notices.pl
>@@ -574,10 +574,11 @@ END_SQL
>                     next;
>                 }
>                 $borrowernumber = $data->{'borrowernumber'};
>-                my $borr =
>-                    $data->{'firstname'} . ', '
>-                  . $data->{'surname'} . ' ('
>-                  . $borrowernumber . ')';
>+                my $borr = sprintf( "%s%s%s (%s)",
>+                $data->{'surname'} || '',
>+                $data->{'firstname'} && $data->{'surname'} ? ', ' : '',
>+                $data->{'firstname'} || '',
>+                $borrowernumber );
>                 $verbose
>                   and warn "borrower $borr has items triggering level $i.";
> 
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 20537: 86124 | 89368 | 90085 | 90086