Lines 39-44
use Koha::ItemTypes;
Link Here
|
39 |
use Koha::CsvProfiles; |
39 |
use Koha::CsvProfiles; |
40 |
use Koha::Patrons; |
40 |
use Koha::Patrons; |
41 |
use Koha::Virtualshelves; |
41 |
use Koha::Virtualshelves; |
|
|
42 |
use Koha::Token; |
42 |
|
43 |
|
43 |
use constant ANYONE => 2; |
44 |
use constant ANYONE => 2; |
44 |
use constant STAFF => 3; |
45 |
use constant STAFF => 3; |
Lines 385-390
if ( $op eq 'view' ) {
Link Here
|
385 |
# this check only serves for button display |
386 |
# this check only serves for button display |
386 |
} |
387 |
} |
387 |
|
388 |
|
|
|
389 |
my $csrf_token = Koha::Token->new->generate_csrf( |
390 |
{ |
391 |
session_id => scalar $query->cookie('CGISESSID'), |
392 |
} |
393 |
); |
394 |
|
388 |
$template->param( |
395 |
$template->param( |
389 |
op => $op, |
396 |
op => $op, |
390 |
referer => $referer, |
397 |
referer => $referer, |
Lines 394-399
$template->param(
Link Here
|
394 |
print => scalar $query->param('print') || 0, |
401 |
print => scalar $query->param('print') || 0, |
395 |
csv_profiles => [ Koha::CsvProfiles->search({ type => 'marc', used_for => 'export_records' })->as_list ], |
402 |
csv_profiles => [ Koha::CsvProfiles->search({ type => 'marc', used_for => 'export_records' })->as_list ], |
396 |
allow_transfer => $allow_transfer, |
403 |
allow_transfer => $allow_transfer, |
|
|
404 |
csrf_token => $csrf_token, |
397 |
); |
405 |
); |
398 |
|
406 |
|
399 |
output_html_with_http_headers $query, $cookie, $template->output; |
407 |
output_html_with_http_headers $query, $cookie, $template->output; |
400 |
- |
|
|