From b1d1a034b24fdd2264c61584854917d3d19d3b14 Mon Sep 17 00:00:00 2001 From: Magnus Enger Date: Wed, 29 Oct 2014 10:31:26 +0100 Subject: [PATCH] Bug 11401: QA followup - fix pod The QA script was complaining about some dodgy POD in C4/Members.pm, that was not introduced by bug 11401. This patch fixes the POD, to keep the QA script happy. Signed-off-by: Katrin Fischer Signed-off-by: Tomas Cohen Arazi --- C4/Members.pm | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/C4/Members.pm b/C4/Members.pm index a87bdd6b88..d528259f11 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -610,7 +610,8 @@ sub GetMember { C returns a borrowersnumber's list of guarantor/guarantees of the member given in parameter -=cut +=cut + sub GetMemberRelatives { my $borrowernumber = shift; my $dbh = C4::Context->dbh; @@ -1676,6 +1677,7 @@ sub GetBorrowercategory { $categorycode = &GetBorrowerCategoryCode( $borrowernumber ); Given the borrowernumber, the function returns the corresponding categorycode + =cut sub GetBorrowerCategorycode { @@ -2267,17 +2269,13 @@ sub GetBorrowersNamesAndLatestIssue { =head2 ModPrivacy -=over 4 - -my $success = ModPrivacy( $borrowernumber, $privacy ); + my $success = ModPrivacy( $borrowernumber, $privacy ); Update the privacy of a patron. return : true on success, false on failure -=back - =cut sub ModPrivacy { -- 2.39.2