From e4f4a7ea98c64b7726784d58b174eb010ae9d4f2 Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Tue, 4 Jan 2022 16:55:05 -0300 Subject: [PATCH] Bug 29794: (follow-up) Add license Signed-off-by: Lucas Gass Signed-off-by: Jonathan Druart Signed-off-by: Fridolin Somers --- misc/cronjobs/delete_items.pl | 22 +++++++++++++++++++--- 1 file changed, 19 insertions(+), 3 deletions(-) diff --git a/misc/cronjobs/delete_items.pl b/misc/cronjobs/delete_items.pl index 3cbe5accc3..2aa9e575d9 100755 --- a/misc/cronjobs/delete_items.pl +++ b/misc/cronjobs/delete_items.pl @@ -1,12 +1,28 @@ #! /usr/bin/perl -use Getopt::Long qw( GetOptions ); +# 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 3 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, see . -use Koha::Script -cron; -use C4::Context; use Modern::Perl; + +use Getopt::Long qw( GetOptions ); use Pod::Usage qw( pod2usage ); +use Koha::Script -cron; + +use C4::Context; use Koha::Items; my $dbh = C4::Context->dbh(); -- 2.39.5