Tweaks to the scheduler

[koha_fer] / tools / import.pl

diff --git a/tools/import.pl b/tools/import.pl
index 569dc6c..07a4b10 100755 (executable)
--- a/tools/import.pl
+++ b/tools/import.pl
@@ -1,7 +1,5 @@
 #!/usr/bin/perl
 
-# $Id$
-
 # Script for handling import of MARC data into Koha db
 #   and Z39.50 lookups
 
@@ -9,7 +7,6 @@
 
 # Licensed under the GPL
 
-
 # Copyright 2000-2002 Katipo Communications
 #
 # This file is part of Koha.
@@ -31,18 +28,14 @@ use strict;
 
 # standard or CPAN modules used
 use CGI;
-use DBI;
+use MARC::File::USMARC;
 
 # Koha modules used
 use C4::Context;
-use C4::Output;
-use C4::Interface::CGI::Output;
+use C4::Auth;
 use C4::Input;
-use C4::Biblio;
-use MARC::File::USMARC;
-
 use C4::Output;
-use C4::Auth;
+use C4::Biblio;
 use C4::Breeding;
 
 #------------------
@@ -84,7 +77,7 @@ if ($uploadmarc && length($uploadmarc)>0) {
        while (<$uploadmarc>) {
                $marcrecord.=$_;
        }
-       my ($notmarcrecord,$alreadyindb,$alreadyinfarm,$imported) = ImportBreeding($marcrecord,$overwrite_biblio,$filename,$syntax,int(rand(99999)));
+       my ($notmarcrecord,$alreadyindb,$alreadyinfarm,$imported) = ImportBreeding($marcrecord,$overwrite_biblio,$filename,$syntax,int(rand(99999)), 'batch');
 
        $template->param(imported => $imported,
                                                        alreadyindb => $alreadyindb,
@@ -100,7 +93,14 @@ output_html_with_http_headers $input, $cookie, $template->output;
 
 #---------------
 # log cleared, as marcimport is (almost) rewritten from scratch.
-# $Log$
+#
+# Revision 1.5  2007/04/24 13:54:30  hdl
+# functions that were in C4::Interface::CGI::Output are now in C4::Output.
+# So this implies quite a change for files.
+# Sorry about conflicts which will be caused.
+# directory Interface::CGI should now be dropped.
+# I noticed that many scripts (reports ones, but also some circ/stats.pl or opac-topissues) still use Date::Manip.
+#
 # Revision 1.4  2007/03/09 15:14:47  tipaul
 # rel_3_0 moved to HEAD
 #