Improve unit test (#1508)

This commit is contained in:
Christophe Maudoux 2018-11-14 22:52:52 +01:00
parent 68d90a4fcb
commit b1d2d061c6

View File

@ -10,7 +10,7 @@ BEGIN {
}
my ( $res, $user, $pwd );
my $maintests = 7;
my $maintests = 8;
my $mailSend = 0;
my $mail2 = 0;
@ -88,6 +88,19 @@ SKIP: {
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);
}
count($maintests);