From 10d8a3e82ffb30000324b9c0652e460223e52cca Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@theke.io>
Date: Tue, 5 Oct 2021 13:24:58 -0300
Subject: [PATCH] Bug 29179: Remove useless includes in moveitem.pl

This patch moves a trivially unneeded set of includes from this file.

To test:
1. Apply the patch
2. Try attaching an item to another biblio
=> SUCCESS: Things work as expected!
3. Sign off :-D

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>

Signed-off-by: Owen Leonard <oleonard@myacpl.org>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
---
 cataloguing/moveitem.pl | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/cataloguing/moveitem.pl b/cataloguing/moveitem.pl
index 704df49556..ec59c258ff 100755
--- a/cataloguing/moveitem.pl
+++ b/cataloguing/moveitem.pl
@@ -24,15 +24,8 @@ use Modern::Perl;
 use CGI qw ( -utf8 );
 use C4::Auth qw( get_template_and_user );
 use C4::Output qw( output_html_with_http_headers );
-use C4::Context;
-use C4::ClassSource;
-use C4::Acquisition qw/GetOrderFromItemnumber ModOrder GetOrder/;
 
 use Koha::Biblios;
-
-
-use MARC::File::XML;
-
 use Koha::Items;
 
 my $query = CGI->new;
@@ -52,8 +45,6 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user(
     }
 );
 
-
-
 my $biblio = Koha::Biblios->find( $biblionumber );
 $template->param(biblio => $biblio);
 $template->param(biblionumber => $biblionumber);
@@ -103,5 +94,4 @@ else {
     if ( !$biblionumber ) { $template->param( missingbiblionumber => 1 ); }
 }
 
-
 output_html_with_http_headers $query, $cookie, $template->output;
-- 
2.39.5