=cut
-use strict;
-use warnings;
+use Modern::Perl;
use C4::Auth;
use C4::Context;
use C4::Output;
use CGI qw ( -utf8 );
use C4::Biblio;
-use C4::Koha; # use getitemtypeinfo
my $query = new CGI;
have_hierarchy => $have_hierarchy,
);
-output_html_with_http_headers $query, $cookie, $template->output;
+output_html_with_http_headers $query, $cookie, $template->output, undef, { force_no_caching => 1 };