[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 address@hidden
 #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');