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

Adapt unit test to new HTML code (#2374)

This commit is contained in:
Clément OUDOT 2020-11-05 10:14:42 +01:00
parent e00f1f9e5f
commit b0ef0376fb
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -374,10 +374,10 @@ ok(
) or print STDERR Dumper( $res->[2]->[0] );
ok(
$res->[2]->[0] =~
m%<input type="checkbox" name="check1x2x1" id="1x2x1" value="accepted"/>%,
m%<input class="form-check-input" type="checkbox" name="check1x2x1" id="1x2x1" value="accepted"/>%,
'Checkbox is displayed'
) or print STDERR Dumper( $res->[2]->[0] );
my @c = ( $res->[2]->[0] =~ m%<input type="checkbox"%gs );
my @c = ( $res->[2]->[0] =~ m%<input class="form-check-input" type="checkbox"%gs );
## One entry found
ok( @c == 1, ' -> One checkbox found' )
@ -418,17 +418,17 @@ expectForm( $res, undef, '/notifback', 'reference1x1' );
ok(
$res->[2]->[0] =~
m%<input type="checkbox" name="check1x1x1" id="1x1x1" value="accepted"/>%
m%<input class="form-check-input" type="checkbox" name="check1x1x1" id="1x1x1" value="accepted"/>%
and m%<label class="form-check-label" for="1x1x1">I agree</label>%,
'Checkbox is displayed'
) or print STDERR Dumper( $res->[2]->[0] );
ok(
$res->[2]->[0] =~
m%<input type="checkbox" name="check1x1x2" id="1x1x2" value="accepted"/>%
m%<input class="form-check-input" type="checkbox" name="check1x1x2" id="1x1x2" value="accepted"/>%
and m%<label class="form-check-label" for="1x1x2">I am sure</label>%,
'Checkbox is displayed'
) or print STDERR Dumper( $res->[2]->[0] );
@c = ( $res->[2]->[0] =~ m%<input type="checkbox"%gs );
@c = ( $res->[2]->[0] =~ m%<input class="form-check-input" type="checkbox"%gs );
## Two entries found
ok( @c == 2, ' -> Two checkboxes found' )