From 74302d7570e5bf6301a3eac07b3f1006d645e9cc Mon Sep 17 00:00:00 2001
From: Paul Poulain <paul.poulain@biblibre.com>
Date: Tue, 28 Apr 2009 23:27:13 +0200
Subject: [PATCH] Serials, use Budget instead of Bookfund

---
 serials/acqui-search.pl | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/serials/acqui-search.pl b/serials/acqui-search.pl
index 408ac83740..5eeaead986 100755
--- a/serials/acqui-search.pl
+++ b/serials/acqui-search.pl
@@ -23,7 +23,6 @@ use warnings;
 use CGI;
 use C4::Auth;
 use C4::Output;
-use C4::Bookfund;
 
 my $query = new CGI;
 
@@ -45,7 +44,7 @@ my $sthtemp =
     "Select flags, branchcode from borrowers where borrowernumber = ?");
 $sthtemp->execute($loggedinuser);
 my ( $flags, $homebranch ) = $sthtemp->fetchrow;
-my @results = GetBookFunds($homebranch);
+my @results = GetBookFunds(1, $homebranch);
 my $count   = scalar(@results);
 
 my $classlist   = '';
-- 
2.20.1