|
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) { |