oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix: captcha image is blank

Browse source
This commit is contained in:
Martin Kamerbeek 2006-06-06 11:11:01 +00:00
parent 9db9e6a7a4
commit dd71810554
2 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

1
docs/changelog/6.x.x.txt
View file

@ -9,6 +9,7 @@
- fix: HTTPproxy
- fix: i18n reserved section name in Surveys
- fix: typo in Asset_ProjectManager i18n
- fix: captcha image is blank (Martink Kamerbeek / Procolix)
6.99.3
- Someone removed the status from the submission templates. That has been

6
lib/WebGUI/Storage/Image.pm
View file

@ -65,9 +65,9 @@ sub addFileFromCaptcha {
my $image = Image::Magick->new();
$image->Set(size=>'105x26');
$image->ReadImage('xc:white');
# $image->AddNoise(noise=>"Multiplicative");
$image->Annotate(font=>$self->session->config->getWebguiRoot."/lib/default.ttf", pointsize=>30, skewY=>0, skewX=>0, gravity=>'center', fill=>'white', antialias=>'true', text=>$challenge);
# $image->Blur(geometry=>"1");
$image->AddNoise(noise=>"Multiplicative");
$image->Annotate(font=>$self->session->config->getWebguiRoot."/lib/default.ttf", pointsize=>30, skewY=>0, skewX=>0, gravity=>'center', fill=>'black', antialias=>'true', text=>$challenge);
$image->Blur(geometry=>"1");
$image->Set(type=>"Grayscale");
$image->Border(fill=>'black', width=>1, height=>1);
$image->Write($self->getPath($filename));