From 1525eb4ff84ab853e2b8538221ab5bf7eec159f6 Mon Sep 17 00:00:00 2001 From: Paul Poulain Date: Fri, 21 Sep 2012 17:41:27 +0200 Subject: [PATCH] bug 5786 follow-up quiet perl -wc --- C4/Reserves.pm | 1 - 1 file changed, 1 deletion(-) diff --git a/C4/Reserves.pm b/C4/Reserves.pm index a59b445..7be0e38 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -2036,7 +2036,6 @@ sub OPACItemHoldsAllowed { issuingrules.itemtype desc, issuingrules.branchcode desc LIMIT 1"; - my $dbh = C4::Context->dbh; my $sth = $dbh->prepare($query); $sth->execute($borrower->{categorycode},$itype,$branchcode); my $data = $sth->fetchrow_hashref; -- 1.7.9.5