From f0244671c480840696c69e33234313215914ab2c Mon Sep 17 00:00:00 2001
From: finlayt <finlayt>
Date: Wed, 4 Sep 2002 22:31:06 +0000
Subject: [PATCH] Bug fix in ReserveWaiting to make sure only the record found
 is marked waiting.

---
 C4/Reserves2.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/C4/Reserves2.pm b/C4/Reserves2.pm
index 35f04b3d02..3e82922d58 100755
--- a/C4/Reserves2.pm
+++ b/C4/Reserves2.pm
@@ -275,10 +275,14 @@ sub ReserveWaiting {
     my $data = $sth->fetchrow_hashref;
     $sth->finish;
     my $biblio = $data->{'biblionumber'};
+    my $timestamp = $data->{'timestamp'};
     my $q_biblio = $dbh->quote($biblio);
+    my $q_timestamp = $dbh->quote($biblio);
 # update reserves record....
     $query = "UPDATE reserves SET priority = 0, found = 'W', itemnumber = $item 
-                            WHERE borrowernumber = $borr AND biblionumber = $q_biblio";
+                            WHERE borrowernumber = $borr 
+                              AND biblionumber = $q_biblio 
+                              AND timestamp = $q_timestamp";
     $sth = $dbh->prepare($query);
     $sth->execute;
     $sth->finish;
-- 
2.39.5