diff --git a/lemonldap-ng-portal/t/42-Register-LDAP.t b/lemonldap-ng-portal/t/42-Register-LDAP.t index 1a3f51281..fb3e23d5b 100644 --- a/lemonldap-ng-portal/t/42-Register-LDAP.t +++ b/lemonldap-ng-portal/t/42-Register-LDAP.t @@ -83,10 +83,11 @@ SKIP: { $pwd = $2; ok( $user eq 'fbar', 'Get good login' ); + my $postString = 'user='.$user.'&password='.$pwd; ok( $res = $client->_post( - '/', IO::String->new('user=fbar&password=fbar'), - length => 23, + '/', IO::String->new($postString), + length => length($postString), accept => 'text/html' ), 'Try to authenticate'