Lines 36-41
use C4::Search::History;
Link Here
|
36 |
use Koha::Authority::Types; |
36 |
use Koha::Authority::Types; |
37 |
use Koha::SearchEngine::Search; |
37 |
use Koha::SearchEngine::Search; |
38 |
use Koha::SearchEngine::QueryBuilder; |
38 |
use Koha::SearchEngine::QueryBuilder; |
|
|
39 |
use Koha::Token; |
39 |
|
40 |
|
40 |
my $query = new CGI; |
41 |
my $query = new CGI; |
41 |
my $dbh = C4::Context->dbh; |
42 |
my $dbh = C4::Context->dbh; |
Lines 58-63
if ( $op eq "delete" ) {
Link Here
|
58 |
debug => 1, |
59 |
debug => 1, |
59 |
} |
60 |
} |
60 |
); |
61 |
); |
|
|
62 |
|
63 |
die "Wrong CSRF token" unless Koha::Token->new->check_csrf({ |
64 |
session_id => scalar $query->cookie('CGISESSID'), |
65 |
token => scalar $query->param('csrf_token'), |
66 |
}); |
67 |
|
61 |
&DelAuthority( $authid, 1 ); |
68 |
&DelAuthority( $authid, 1 ); |
62 |
|
69 |
|
63 |
if ( $query->param('operator') ) { |
70 |
if ( $query->param('operator') ) { |
Lines 111-116
if ( $op eq "do_search" ) {
Link Here
|
111 |
} |
118 |
} |
112 |
); |
119 |
); |
113 |
|
120 |
|
|
|
121 |
$template->param( |
122 |
csrf_token => Koha::Token->new->generate_csrf({ |
123 |
session_id => scalar $query->cookie('CGISESSID'), |
124 |
}), |
125 |
); |
126 |
|
114 |
# search history |
127 |
# search history |
115 |
if (C4::Context->preference('EnableSearchHistory')) { |
128 |
if (C4::Context->preference('EnableSearchHistory')) { |
116 |
if ( $startfrom == 1) { |
129 |
if ( $startfrom == 1) { |