diff --git a/acqui/invoice-files.pl b/acqui/invoice-files.pl index 39ab34d51e..736b378b0c 100755 --- a/acqui/invoice-files.pl +++ b/acqui/invoice-files.pl @@ -31,7 +31,7 @@ use Modern::Perl; use CGI; use C4::Auth qw( get_template_and_user ); -use C4::Output qw( output_html_with_http_headers ); +use C4::Output qw( output_html_with_http_headers output_error ); use C4::Acquisition qw( GetInvoice GetInvoiceDetails ); use Koha::Misc::Files; @@ -45,6 +45,10 @@ my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user( } ); +if ( !C4::Context->preference('AcqEnableFiles') ) { + output_error( $input, '404' ); +} + my $invoiceid = $input->param('invoiceid') // ''; my $op = $input->param('op') // ''; my %errors;