[Koha-patches] [PATCH] [SIGNED-OFF] Removing a Perl warning

[Marcel de Rooy]

From: Paul Poulain <paul.poulain at biblibre.com>

Signed-off-by: Marcel de Rooy <m.de.rooy at rijksmuseum.nl>
Applied small fix to proposed patch. Tested. No warnings.
---
 members/moremember.pl |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/members/moremember.pl b/members/moremember.pl
index 9dcfa3a..c0c0d87 100755
--- a/members/moremember.pl
+++ b/members/moremember.pl
@@ -242,7 +242,7 @@ if ( C4::Context->preference('OPACPrivacy') ) {
 #
 my @borrowernumbers = GetMemberRelatives($borrowernumber);
 my $issue       = GetPendingIssues($borrowernumber);
-my $relissue    = GetPendingIssues(@borrowernumbers);
+my $relissue    = @borrowernumbers>0? GetPendingIssues(@borrowernumbers): [];
 my $issuecount = scalar(@$issue);
 my $relissuecount  = scalar(@$relissue);
 my $roaddetails = &GetRoadTypeDetails( $data->{'streettype'} );
-- 
1.6.0.6

_______________________________________________
Koha-patches mailing list
Koha-patches at lists.koha-community.org
http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-patches
website : http://www.koha-community.org/
git : http://git.koha-community.org/
bugs : http://bugs.koha-community.org/