From f3ab1904dcf1c38165beb59dd973784ba4c1e436 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Mon, 15 Mar 2004 14:32:40 +0000
Subject: [PATCH] missing my

---
 C4/Catalogue.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Catalogue.pm b/C4/Catalogue.pm
index 0bc15b0433..e497da5720 100644
--- a/C4/Catalogue.pm
+++ b/C4/Catalogue.pm
@@ -265,7 +265,7 @@ sub modorder {
   $sth=$dbh->prepare("update aqorderbreakdown set bookfundid=? where
   ordernumber=?");
   if ($sth->execute($bookfund,$ordnum) == 0) { # zero rows affected [Bug 734]
-    $query="insert into aqorderbreakdown (ordernumber,bookfundid) values (?,?)";
+    my $query="insert into aqorderbreakdown (ordernumber,bookfundid) values (?,?)";
     $sth=$dbh->prepare($query);
     $sth->execute($ordnum,$bookfund);
   }
-- 
2.39.5