Fix unit tests after #2616

This commit is contained in:
Maxime Besson 2021-09-15 14:00:52 +02:00
parent 8aa3e65137
commit dd6291643d
2 changed files with 4 additions and 4 deletions

View File

@ -63,7 +63,7 @@ foreach (@form) {
expectForm( [ $res->[0], $res->[1], [$_] ], undef, undef, 'test' );
}
$query =~ s/user=/user=dwho/;
$query =~ s/user=[^&]*/user=dwho/;
$query =~ s/password=/password=dwho/;
$query =~ s/test=\w*\b/test=1_demo/;

View File

@ -30,7 +30,7 @@ count(1);
my ( $host, $url, $query ) =
expectForm( $res, '#', undef, 'user', 'password', 'spoofId', 'token' );
$query =~ s/user=/user=rtyler/;
$query =~ s/user=[^&]*/user=rtyler/;
$query =~ s/password=/password=rtyler/;
$query =~ s/spoofId=/spoofId=dwho/;
@ -62,7 +62,7 @@ count(1);
( $host, $url, $query ) =
expectForm( $res, '#', undef, 'user', 'password', 'spoofId', 'token' );
$query =~ s/user=/user=rtyler/;
$query =~ s/user=[^&]*/user=rtyler/;
$query =~ s/password=/password=rtyler/;
$query =~ s/spoofId=/spoofId=msmith/;
@ -86,7 +86,7 @@ count(2);
( $host, $url, $query ) =
expectForm( $res, '#', undef, 'user', 'password', 'spoofId', 'token' );
$query =~ s/user=/user=dwho/;
$query =~ s/user=[^&]*/user=dwho/;
$query =~ s/password=/password=dwho/;
$query =~ s/spoofId=/spoofId=msmith/;