[Koha-cvs] koha currency.pl

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Changes by:	Antoine Farnault <toins>	06/07/27 14:02:47

Modified files:
	.              : currency.pl 

Log message:
	Add a call to Bookfund & 1 sub renamed.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/currency.pl?cvsroot=koha&r1=1.8&r2=1.9

Patches:
Index: currency.pl
===================================================================
RCS file: /sources/koha/koha/currency.pl,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- currency.pl	13 Jul 2004 12:55:01 -0000	1.8
+++ currency.pl	27 Jul 2006 14:02:47 -0000	1.9
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: currency.pl,v 1.8 2004/07/13 12:55:01 tipaul Exp $
+# $Id: currency.pl,v 1.9 2006/07/27 14:02:47 toins Exp $
 
 #written by chris at katipo.co.nz
 #9/10/2000
@@ -27,6 +27,7 @@
 use CGI;
 use C4::Acquisition;
 use C4::Biblio;
+use C4::Bookfund;
 
 my $input=new CGI;
 
@@ -35,7 +36,7 @@
 	if ($param ne 'type' && $param !~ /submit/){
 		my $data=$input->param($param);
 		warn "$data / $param";
-		updatecurrencies($param,$data);
+		ModCurrencies($param,$data);
 }
 }
 print $input->redirect('/cgi-bin/koha/acqui/acqui-home.pl');