From 58237481d527545d3c2db9251bd2cede6b65fb79 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A8re=20S=C3=A9bastien=20Marie?= Date: Sat, 2 Jul 2011 16:38:10 +0200 Subject: [PATCH] sco-main.pl: Parentheses missing around "my" list MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Frère Sébastien Marie --- opac/sco/sco-main.pl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/opac/sco/sco-main.pl b/opac/sco/sco-main.pl index b36ff64..2488f67 100755 --- a/opac/sco/sco-main.pl +++ b/opac/sco/sco-main.pl @@ -92,7 +92,7 @@ my $issuer = GetMemberDetails($issuerid); my $item = GetItem(undef,$barcode); if (C4::Context->preference('SelfCheckoutByLogin') && !$patronid) { my $dbh = C4::Context->dbh; - my $resval, $patronid = checkpw($dbh, $patronlogin, $patronpw); + my ($resval, $patronid) = checkpw($dbh, $patronlogin, $patronpw); } my $borrower = GetMemberDetails(undef,$patronid); -- 1.7.2.5