blob: 7e8e60a8a35a23b5499a57eb2a7007ba9ae23d2b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
use FixMyStreet::Test;
use FixMyStreet::Email;
my $secret = FixMyStreet::DB->resultset('Secret')->update({
secret => 'abcdef123456' });
my $hash = FixMyStreet::Email::hash_from_id("report", 123);
is $hash, '8fb274c6', 'Hash generation okay';
my $token = FixMyStreet::Email::generate_verp_token("report", 123);
is $token, "report-123-8fb274c6", 'Token generation okay';
my ($type, $id) = FixMyStreet::Email::check_verp_token($token);
is $type, "report", 'Correct type from token';
is $id, 123, 'Correct ID from token';
done_testing();
|
