Commit 33b0942a authored by Christophe Maudoux's avatar Christophe Maudoux 🐛

Improve unit test (#2019)

parent 4c859032
......@@ -6,7 +6,7 @@ require 't/test-lib.pm';
my $res;
my $maintests = 24;
my $maintests = 25;
SKIP: {
eval 'use GD::SecurityImage;use Image::Magick;';
if ($@) {
......@@ -112,6 +112,11 @@ m%<input name="password" type="text" class="form-control key" autocomplete="off"
ok( $newtoken ne $token, ' Token is refreshed' );
ok( $res->[2]->[0] =~ m#<img id="captcha" src="data:image/png;base64#,
' New captcha image inserted' );
ok(
$res->[2]->[0] =~
m#<img class="renewcaptchaclick" src="/static/common/icons/arrow_refresh.png" alt="Renew Captcha" title="Renew Captcha" class="img-thumbnail mb-3" />#,
' Renew Captcha button found'
);
# Try to renew captcha
ok( $res = $client->_get( '/renewcaptcha', accept => 'text/html' ),
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment