|
Lines 22-28
use Modern::Perl;
Link Here
|
| 22 |
use CGI; |
22 |
use CGI; |
| 23 |
|
23 |
|
| 24 |
use C4::Auth qw( get_template_and_user ); |
24 |
use C4::Auth qw( get_template_and_user ); |
| 25 |
use C4::Output qw( output_html_with_http_headers ); |
25 |
use C4::Output qw( output_and_exit output_html_with_http_headers ); |
| 26 |
use Koha::Notice::Templates; |
26 |
use Koha::Notice::Templates; |
| 27 |
use Koha::AuthorisedValues; |
27 |
use Koha::AuthorisedValues; |
| 28 |
use Koha::Illcomment; |
28 |
use Koha::Illcomment; |
|
Lines 97-102
if ( $backends_available ) {
Link Here
|
| 97 |
( tran_success => $params->{tran_success} ) : () ), |
97 |
( tran_success => $params->{tran_success} ) : () ), |
| 98 |
); |
98 |
); |
| 99 |
|
99 |
|
|
|
100 |
output_and_exit( $cgi, $cookie, $template, 'unknown_ill_request' ) if !$request; |
| 101 |
|
| 100 |
my $backend_result = $request->backend_illview($params); |
102 |
my $backend_result = $request->backend_illview($params); |
| 101 |
$template->param( |
103 |
$template->param( |
| 102 |
whole => $backend_result, |
104 |
whole => $backend_result, |