Bug 19059: Fix compilation issues

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

diff --git a/C4/Reserves.pm b/C4/Reserves.pm
index 079fb39..39153bb 100644 (file)
--- a/C4/Reserves.pm
+++ b/C4/Reserves.pm
@@ -799,7 +799,6 @@ sub CancelExpiredReserves {
     my $dbh = C4::Context->dbh;
 
     my $dtf = Koha::Database->new->schema->storage->datetime_parser;
-    my $today = dt_from_string;
     # FIXME To move to Koha::Holds->search_expired (?)
     my $holds = Koha::Holds->search(
         {

diff --git a/circ/branchtransfers.pl b/circ/branchtransfers.pl
index bdb007f..c1d30cb 100755 (executable)
--- a/circ/branchtransfers.pl
+++ b/circ/branchtransfers.pl
@@ -82,7 +82,7 @@ my $ignoreRs = 0;
 # Deal with the requests....
 if ( $request eq "KillWaiting" ) {
     my $item = $query->param('itemnumber');
-    my $holds = Koha::Holds->search(
+    my $holds = Koha::Holds->search({
         itemnumber     => $item,
         borrowernumber => $borrowernumber
     });
@@ -101,7 +101,7 @@ elsif ( $request eq "SetWaiting" ) {
 }
 elsif ( $request eq 'KillReserved' ) {
     my $biblionumber = $query->param('biblionumber');
-    my $holds = Koha::Holds->search(
+    my $holds = Koha::Holds->search({
         biblionumber   => $biblionumber,
         borrowernumber => $borrowernumber
     });

diff --git a/t/db_dependent/Circulation.t b/t/db_dependent/Circulation.t
index 4ed1e78..34728d3 100755 (executable)
--- a/t/db_dependent/Circulation.t
+++ b/t/db_dependent/Circulation.t
@@ -516,7 +516,7 @@ C4::Context->dbh->do("DELETE FROM accountlines");
     is( $renewokay, 0, '(Bug 8236), Cannot renew, this item is overdue');
 
 
-    my $hold = Koha::Holds->search({ biblionumber => $biblionumber, borrowernumber => $reserving_borrowernumber })->next;
+    $hold = Koha::Holds->search({ biblionumber => $biblionumber, borrowernumber => $reserving_borrowernumber })->next;
     $hold->cancel;
 
     # Bug 14101