Fix unit tests for #2791

This commit is contained in:
Maxime Besson 2022-08-30 11:47:42 +02:00
parent 318e08ccc7
commit d6efecb6cc
2 changed files with 13 additions and 6 deletions

View File

@ -3,7 +3,7 @@ use strict;
use IO::String;
require 't/test-lib.pm';
my $maintests = 27;
my $maintests = 28;
SKIP: {
eval { require Convert::Base32 };
@ -186,10 +186,13 @@ SKIP: {
),
'Post code'
);
( $host, $url, $query ) =
expectForm( $res, '#', undef, 'user', 'password', 'token' );
ok( $res->[2]->[0] =~ /<span trmsg="82"><\/span>/, 'Token expired' )
or print STDERR Dumper( $res->[2]->[0] );
unlike(
$res->[2]->[0],
qr/input id="userfield"/,
'Login form is not displayed'
);
# Try to sign-in
ok( $res = $client->_get( '/', accept => 'text/html' ), 'Get Menu', );

View File

@ -4,7 +4,7 @@ use IO::String;
use JSON qw/from_json to_json/;
require 't/test-lib.pm';
my $maintests = 30;
my $maintests = 31;
SKIP: {
eval { require Convert::Base32 };
@ -187,10 +187,14 @@ SKIP: {
),
'Post code'
);
( $host, $url, $query ) =
expectForm( $res, '#', undef, 'user', 'password', 'token' );
ok( $res->[2]->[0] =~ /<span trmsg="82"><\/span>/, 'Token expired' )
or print STDERR Dumper( $res->[2]->[0] );
unlike(
$res->[2]->[0],
qr/input id="userfield"/,
'Login form is not displayed'
);
# Try to sign-in
ok( $res = $client->_get( '/', accept => 'text/html' ), 'Get Menu', );