I am using Imager version 0.73
on Windows XP
and Strawberry Perl 5.10.1.1
I am using Imager to draw graphs as .png files.
I use method align_string as in the following code:
my($L,$T,$R,$B) = $image->align_string(
string => $y_value,
font => $font,
x => $x_px,
y => $y_px,
halign => 'right',
valign => 'center',
);
to label Y axis with scale numbers, but when $y_value == 0 the string is not
drawn.
The problem appears to be at line #3737 in Imager.pm and the test at line
#3739 also fails.
3737 $input{string}||=$input{text}; #?? $input{string} becomes undef
when this line is executed - $input{text} is also not defined
3739 unless(exists $input{string}) { #?? this statement failes because
$input{string} exists but is undef
$self->_set_error("missing required parameter 'string'");
return;
}
I think the code will be correct if line 3737 is just deleted.
Thanks for a very useful module.
Regards
Maurice Height