From 689e3ac5fce0ccee109b135bffa98e962db37640 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 9 Apr 2021 11:39:36 +0200 Subject: [PATCH] Bug 28028: Remove misc/migration_tools/fix_onloan.pl MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit There is an obvious error in the script since bug 23463 and it's known to be broken for 10 years now (since bug 5579). As nobody complains we can safely remove this script. Signed-off-by: Joonas Kylmälä Signed-off-by: Kyle M Hall Signed-off-by: Jonathan Druart (cherry picked from commit c285de980266a23919fe64d26665ccd53355b820) Signed-off-by: Fridolin Somers --- misc/migration_tools/fix_onloan.pl | 19 ------------------- 1 file changed, 19 deletions(-) delete mode 100755 misc/migration_tools/fix_onloan.pl diff --git a/misc/migration_tools/fix_onloan.pl b/misc/migration_tools/fix_onloan.pl deleted file mode 100755 index a7a8638d19..0000000000 --- a/misc/migration_tools/fix_onloan.pl +++ /dev/null @@ -1,19 +0,0 @@ -#!/usr/bin/perl - -use Modern::Perl; -use Koha::Script; -use Koha::Items; -# -# the items.onloan field did not exist in koha 2.2 -# in koha 3.0, it's used to define item availability -# this script takes the items.onloan field -# and put it in the MARC::Record of the item -# - -my $items = Koha::Items->({ onloan => { '!=' => undef } }); - -$|=1; -while ( my $item = $items->next ) { - $item->store; - print sprintf "Onloan : %s for %s / %s\n", $item->onloan, $item->biblionumber, $item->itemnumber; -} -- 2.39.5