Bug 30933: Adjust pref description, include ListOwnerDesignated
[srvgit] / acqui / invoice-files.pl
index d80ee02..d4e43cf 100755 (executable)
@@ -30,9 +30,9 @@ Manage files associated with invoice
 use Modern::Perl;
 
 use CGI;
-use C4::Auth;
-use C4::Output;
-use C4::Acquisition;
+use C4::Auth qw( get_template_and_user );
+use C4::Output qw( output_html_with_http_headers );
+use C4::Acquisition qw( GetInvoice GetInvoiceDetails );
 use Koha::Misc::Files;
 
 my $input = CGI->new;
@@ -42,7 +42,6 @@ my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
         query           => $input,
         type            => 'intranet',
         flagsrequired   => { 'acquisition' => '*' },
-        debug           => 1,
     }
 );