|
Lines 54-59
use String::Random;
Link Here
|
| 54 |
use WWW::CSRF; |
54 |
use WWW::CSRF; |
| 55 |
use Digest::MD5 qw( md5_base64 ); |
55 |
use Digest::MD5 qw( md5_base64 ); |
| 56 |
use Encode; |
56 |
use Encode; |
|
|
57 |
use C4::Context; |
| 57 |
use Koha::Exceptions::Token; |
58 |
use Koha::Exceptions::Token; |
| 58 |
use base qw(Class::Accessor); |
59 |
use base qw(Class::Accessor); |
| 59 |
use constant HMAC_SHA1_LENGTH => 20; |
60 |
use constant HMAC_SHA1_LENGTH => 20; |
| 60 |
- |
|
|