[Koha-cvs] koha/tools export.pl [rel_3_0]

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/10/03 12:42:55

Modified files:
	tools          : export.pl 

Log message:
	GPL added.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/tools/export.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.1&r2=1.1.2.2

Patches:
Index: export.pl
===================================================================
RCS file: /sources/koha/koha/tools/export.pl,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -u -b -r1.1.2.1 -r1.1.2.2
--- export.pl	31 Aug 2006 16:23:45 -0000	1.1.2.1
+++ export.pl	3 Oct 2006 12:42:55 -0000	1.1.2.2
@@ -1,4 +1,23 @@
 #!/usr/bin/perl
+
+#
+# This file is part of Koha.
+#
+# Koha is free software; you can redistribute it and/or modify it under the
+# terms of the GNU General Public License as published by the Free Software
+# Foundation; either version 2 of the License, or (at your option) any later
+# version.
+#
+# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
+# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along with
+# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
+# Suite 330, Boston, MA  02111-1307 USA
+
+# $Id: export.pl,v 1.1.2.2 2006/10/03 12:42:55 toins Exp $
+
 use HTML::Template;
 use strict;
 require Exporter;
@@ -56,7 +75,7 @@
 	}
 	$strsth.=" order by marc_biblio.biblionumber ";
 	$strsth.= "LIMIT 0,$limit " if ($limit);
-	warn "requête marc.pl : ".$strsth;
+	warn "requete marc.pl : ".$strsth;
 	my $req=$dbh->prepare($strsth);
 	$req->execute;
 	while (my ($bibid) = $req->fetchrow) {