Add #1723 test
This commit is contained in:
parent
eabe1dc129
commit
c7dd179f2c
|
@ -37,8 +37,9 @@ LWP::Protocol::PSGI->register(
|
||||||
' Post request'
|
' Post request'
|
||||||
);
|
);
|
||||||
count(1);
|
count(1);
|
||||||
expectOK($res);
|
ok( ( $res->[0] == 200 or $res->[0] == 401 ), ' Get 200 or 401' );
|
||||||
$idpId = expectCookie($res);
|
count(1);
|
||||||
|
$idpId = expectCookie($res) if ( $res->[0] == 200 );
|
||||||
}
|
}
|
||||||
elsif ( $req->method =~ /^(get|delete)$/i ) {
|
elsif ( $req->method =~ /^(get|delete)$/i ) {
|
||||||
my $mth = '_' . lc($1);
|
my $mth = '_' . lc($1);
|
||||||
|
@ -222,6 +223,17 @@ ok(
|
||||||
count(1);
|
count(1);
|
||||||
expectReject($res);
|
expectReject($res);
|
||||||
|
|
||||||
|
# Try to auth with a bad password
|
||||||
|
ok(
|
||||||
|
$res = $sp->_post(
|
||||||
|
'/', IO::String->new('user=dwho&password=xxxx'),
|
||||||
|
length => 23,
|
||||||
|
accept => 'text/html'
|
||||||
|
),
|
||||||
|
'Post user/password'
|
||||||
|
);
|
||||||
|
count(1);
|
||||||
|
|
||||||
clean_sessions();
|
clean_sessions();
|
||||||
done_testing( count() );
|
done_testing( count() );
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user