From 69c03f21941a308a000672b5483475cd9665cc4f Mon Sep 17 00:00:00 2001
From: finlayt <finlayt>
Date: Wed, 4 Sep 2002 22:51:39 +0000
Subject: [PATCH] Little bug fixes.

---
 C4/Reserves2.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/C4/Reserves2.pm b/C4/Reserves2.pm
index 3e82922d58..9ac3c49384 100755
--- a/C4/Reserves2.pm
+++ b/C4/Reserves2.pm
@@ -263,7 +263,8 @@ sub ReserveWaiting {
 # get priority and biblionumber....
     my $query = "SELECT reserves.priority     as priority, 
                         reserves.biblionumber as biblionumber,
-                        reserves.branchcode   as branchcode 
+                        reserves.branchcode   as branchcode, 
+                        reserves.timestamp     as timestamp
                       FROM reserves,items 
                      WHERE reserves.biblionumber   = items.biblionumber 
                        AND items.itemnumber        = $item 
@@ -277,12 +278,14 @@ sub ReserveWaiting {
     my $biblio = $data->{'biblionumber'};
     my $timestamp = $data->{'timestamp'};
     my $q_biblio = $dbh->quote($biblio);
-    my $q_timestamp = $dbh->quote($biblio);
+    my $q_timestamp = $dbh->quote($timestamp);
+    warn "Timestamp: ".$timestamp."\n";
 # update reserves record....
     $query = "UPDATE reserves SET priority = 0, found = 'W', itemnumber = $item 
                             WHERE borrowernumber = $borr 
                               AND biblionumber = $q_biblio 
                               AND timestamp = $q_timestamp";
+    warn "Query: ".$query."\n";
     $sth = $dbh->prepare($query);
     $sth->execute;
     $sth->finish;
-- 
2.39.5