From 7d624e098f073261ef6610894da8c218f10959fb Mon Sep 17 00:00:00 2001 From: Magnus Enger Date: Wed, 29 Oct 2014 10:31:26 +0100 Subject: [PATCH] [PASSED QA] 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 --- C4/Members.pm | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/C4/Members.pm b/C4/Members.pm index c6115b2..3302888 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 { @@ -2224,17 +2226,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 { -- 1.9.1