X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=catalogue%2Fissuehistory.pl;h=4f361367bfe40745d23585e7f27bd1b0169dd2ec;hb=be54d835cb3c2801193d574c0b38ca4d3e7503b4;hp=e81ec56de50d68f71863cf34ebbd79aead56c213;hpb=96cc447045f3f1d3702a3c69b36f596d88f38eda;p=koha-ffzg.git

diff --git a/catalogue/issuehistory.pl b/catalogue/issuehistory.pl
index e81ec56de5..4f361367bf 100755
--- a/catalogue/issuehistory.pl
+++ b/catalogue/issuehistory.pl
@@ -19,12 +19,11 @@
 use Modern::Perl;
 
 use CGI qw ( -utf8 );
-use C4::Auth;
-use C4::Output;
+use C4::Auth qw( get_template_and_user );
+use C4::Output qw( output_html_with_http_headers );
 
-use C4::Biblio;    # GetBiblio
-use C4::Search;		# enabled_staff_search_views
-use C4::Serials;
+use C4::Search qw( enabled_staff_search_views );
+use C4::Serials qw( CountSubscriptionFromBiblionumber );
 use Koha::Checkouts;
 use Koha::Old::Checkouts;
 
@@ -48,14 +47,14 @@ my @checkouts = Koha::Checkouts->search(
         join       => 'item',
         order_by   => 'timestamp',
     }
-);
+)->as_list;
 my @old_checkouts = Koha::Old::Checkouts->search(
     { biblionumber => $biblionumber },
     {
         join       => 'item',
         order_by   => 'timestamp',
     }
-);
+)->as_list;
 
 my $biblio = Koha::Biblios->find( $biblionumber );