Improve unit test (#1508)
This commit is contained in:
parent
68d90a4fcb
commit
b1d2d061c6
|
@ -10,7 +10,7 @@ BEGIN {
|
||||||
}
|
}
|
||||||
|
|
||||||
my ( $res, $user, $pwd );
|
my ( $res, $user, $pwd );
|
||||||
my $maintests = 7;
|
my $maintests = 8;
|
||||||
my $mailSend = 0;
|
my $mailSend = 0;
|
||||||
|
|
||||||
my $mail2 = 0;
|
my $mail2 = 0;
|
||||||
|
@ -88,6 +88,19 @@ SKIP: {
|
||||||
|
|
||||||
ok( mail() =~ /Your password was changed/, 'Password was changed' );
|
ok( mail() =~ /Your password was changed/, 'Password was changed' );
|
||||||
|
|
||||||
|
ok(
|
||||||
|
$res = $client->_post(
|
||||||
|
'/',
|
||||||
|
IO::String->new('user=dwho&password=zz&test=sql'),
|
||||||
|
length => 30
|
||||||
|
),
|
||||||
|
'Auth query'
|
||||||
|
);
|
||||||
|
expectOK($res);
|
||||||
|
my $id = expectCookie($res);
|
||||||
|
|
||||||
|
$client->logout($id);
|
||||||
|
|
||||||
#print STDERR Dumper($query);
|
#print STDERR Dumper($query);
|
||||||
}
|
}
|
||||||
count($maintests);
|
count($maintests);
|
||||||
|
|
Loading…
Reference in New Issue
Block a user