Commit ce7629e8 authored by Christophe Maudoux's avatar Christophe Maudoux

Improve unit tests (#1539)

parent 4f787363
......@@ -24,13 +24,19 @@ ok(
count(1);
expectReject($res);
ok( $res = $client->_get( '/', accept => 'text/html' ), 'Get Menu' );
ok( $res->[2]->[0] =~ m%<span id="languages"></span>%,
' Language icons found' )
or print STDERR Dumper( $res->[2]->[0] );
count(2);
# Try to authenticate
# -------------------
ok(
$res = $client->_post(
'/',
IO::String->new('user=dwho&password=dwho'),
length => 23
length => 23,
),
'Auth query'
);
......
......@@ -15,10 +15,17 @@ my $client = LLNG::Manager::Test->new(
logLevel => 'error',
passwordDB => 'Demo',
portalRequireOldPassword => 1,
showLanguages => 0,
}
}
);
ok( $res = $client->_get( '/', accept => 'text/html' ), 'Get Menu' );
ok( $res->[2]->[0] !~ m%<span id="languages"></span>%,
' No language icon found' )
or print STDERR Dumper( $res->[2]->[0] );
count(2);
# Try yo authenticate
# -------------------
ok(
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment