Fix random CI failures

This commit is contained in:
Maxime Besson 2021-01-20 16:52:20 +01:00
parent 0e5686a7db
commit ef3c0121e7
1 changed files with 4 additions and 4 deletions

View File

@ -175,7 +175,7 @@ SKIP: {
$query =~ s/user=/user=dwho/;
$query =~ s/password=/password=dwho/;
Time::Fake->offset("+95");
Time::Fake->offset("+120");
ok(
$res = $client->_post(
'/',
@ -196,7 +196,7 @@ SKIP: {
),
'Post code'
);
ok( $res->[2]->[0] =~ /<span trmsg="96"><\/span>/, 'Bad TOTP' )
ok( $res->[2]->[0] =~ /<span trmsg="96"><\/span>/, 'Bad TOTP (backward)' )
or print STDERR Dumper( $res->[2]->[0] );
Time::Fake->reset;
@ -207,7 +207,7 @@ SKIP: {
$query =~ s/user=/user=dwho/;
$query =~ s/password=/password=dwho/;
Time::Fake->offset("-90");
Time::Fake->offset("-120");
ok(
$res = $client->_post(
'/',
@ -228,7 +228,7 @@ SKIP: {
),
'Post code'
);
ok( $res->[2]->[0] =~ /<span trmsg="96"><\/span>/, 'Bad TOTP' )
ok( $res->[2]->[0] =~ /<span trmsg="96"><\/span>/, 'Bad TOTP (forward)' )
or print STDERR Dumper( $res->[2]->[0] );
}
count($maintests);