From ebfcdb97b5b2b098d2ddf953dfbc08f3f9a2c295 Mon Sep 17 00:00:00 2001
From: toins <toins>
Date: Fri, 7 Jul 2006 08:02:46 +0000
Subject: [PATCH] Sub renamed according to the coding guidelines

---
 C4/Acquisition.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm
index 3854177def..295b375c3e 100644
--- a/C4/Acquisition.pm
+++ b/C4/Acquisition.pm
@@ -391,9 +391,9 @@ sub receiveorder {
 											unitprice=?,freight=?,rrp=?
 							where biblionumber=? and ordernumber=?"
     );
-    my $suggestionid = findsuggestion_from_biblionumber( $dbh, $biblio );
+    my $suggestionid = GetSuggestionFromBiblionumber( $dbh, $biblio );
     if ($suggestionid) {
-        changestatus( $suggestionid, 'AVAILABLE', '', $biblio );
+        ModStatus( $suggestionid, 'AVAILABLE', '', $biblio );
     }
     $sth->execute( $quantrec, $invoiceno, $cost, $freight, $rrp, $biblio,
         $ordnum );