From 0965b1c3a5e70f2a8d7cff1e7aedc3d82b3d017b Mon Sep 17 00:00:00 2001 From: Owen Leonard Date: Tue, 17 Oct 2023 15:50:28 +0000 Subject: [PATCH] Bug 22632: (follow-up) Perltidy fixes for Koha/Patron.pm Signed-off-by: David Nind --- Koha/Patron.pm | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/Koha/Patron.pm b/Koha/Patron.pm index 9988fb8cde..7540334f60 100644 --- a/Koha/Patron.pm +++ b/Koha/Patron.pm @@ -677,9 +677,16 @@ sub merge_with { $patron->move_to_deleted(); $patron->delete(); - if (C4::Context->preference("BorrowersLog")){ - my $info = $patron->firstname. " " . $patron->surname . " (".$patron->cardnumber . ")". " has been merged into " . $self->firstname . " " . $self->surname . " (".$self->cardnumber . ")" ; - logaction("MEMBERS", "PATRON_MERGE", $self->id, $info ); + if ( C4::Context->preference("BorrowersLog") ) { + my $info = + $patron->firstname . " " + . $patron->surname . " (" + . $patron->cardnumber . ")" + . " has been merged into " + . $self->firstname . " " + . $self->surname . " (" + . $self->cardnumber . ")"; + logaction( "MEMBERS", "PATRON_MERGE", $self->id, $info ); } } }); -- 2.30.2