From a23577cefae2312efe4f91709dccdf39370504d9 Mon Sep 17 00:00:00 2001 From: Martin Renvoize Date: Wed, 20 Feb 2019 10:43:47 +0000 Subject: [PATCH] Bug 21756: (QA follow-up) Fix for 'Spurious text after =cut' Signed-off-by: Martin Renvoize Signed-off-by: Kyle M Hall Signed-off-by: Nick Clemens --- Koha/Patron.pm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/Koha/Patron.pm b/Koha/Patron.pm index 93f6f89b88..eeaf0e4dc2 100644 --- a/Koha/Patron.pm +++ b/Koha/Patron.pm @@ -84,8 +84,6 @@ Koha::Patron - Koha Patron Object class =head2 Class Methods -=cut - =head3 new =cut @@ -884,7 +882,6 @@ It has been introduced to replaced the C4::Members::GetPendingIssues subroutine It should not be used directly, prefer to access fields you need instead of retrieving all these fields in one go. - =cut sub pending_checkouts { @@ -1221,6 +1218,7 @@ my $is_child = $patron->is_child Return true if the patron has a category with a type Child (C) =cut + sub is_child { my( $self ) = @_; return $self->category->category_type eq 'C' ? 1 : 0; -- 2.39.5