dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Improve unit tests

Browse Source
This commit is contained in:
Christophe Maudoux 2020-02-12 18:49:16 +01:00
parent 2b3413d1ab
commit 120e9c10da
3 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lemonldap-ng-portal/t/40-Notifications-JSON-File.t
View File

@ -94,7 +94,7 @@ ok(
);
count(1);
expectOK($res);
my $id = expectCookie($res);
$id = expectCookie($res);
expectForm( $res, undef, '/notifback', 'reference1x1', 'url' );
# Verify that cookie is ciphered (session unvalid)
@ -207,7 +207,6 @@ ok(
$res = $client->_get(
'/',
cookie => "lemonldap=$id",
length => 64,
accept => 'text/html',
),
'New auth query'

6
lemonldap-ng-portal/t/68-ContextSwitching.t
View File

@ -61,10 +61,14 @@ ok(
$res->[2]->[0] =~ m%<span trspan="connectedAs">Connected as</span> rtyler%,
'Connected as rtyler'
) or print STDERR Dumper( $res->[2]->[0] );
ok(
$res->[2]->[0] =~ qr%<span id="languages"></span>%,
'Found language flags'
) or print STDERR Dumper( $res->[2]->[0] );
expectAuthenticatedAs( $res, 'rtyler' );
ok( $res->[2]->[0] !~ m%contextSwitching_ON%, 'Connected as dwho' )
or print STDERR Dumper( $res->[2]->[0] );
count(2);
count(3);
$client->logout($id);

9
lemonldap-ng-portal/t/75-2F-Registers.t
View File

@ -4,7 +4,7 @@ use IO::String;
use Data::Dumper;
require 't/test-lib.pm';
my $maintests = 52;
my $maintests = 54;
SKIP: {
eval { require Convert::Base32 };
@ -64,10 +64,13 @@ SKIP: {
);
ok( $res->[2]->[0] =~ /totpregistration\.(?:min\.)?js/, 'Found TOTP js' );
ok(
$res->[2]->[0] =~ qr%<img src="/static/common/logos/logo_llng_old.png"%,
$res->[2]->[0] =~ qr%<img src="/static/common/logos/logo_llng_old\.png"%,
'Found custom Main Logo'
) or print STDERR Dumper( $res->[2]->[0] );
count(1);
ok(
$res->[2]->[0] =~ qr%<span id="languages"></span>%,
'Language icons found'
) or print STDERR Dumper( $res->[2]->[0] );
# Register TOTP
# JS query