Subject: | upper range of Y axis |
package GD::3DBarGrapher
Version: $GD::3DBarGrapher::VERSION = '0.9.5';^M
OS: (the bug is on OS independent)
FreeBSD 6.2-STABLE FreeBSD 6.2-STABLE
FreeBSD 7.1-PRERELEASE FreeBSD 7.1-PRERELEASE
Perl -v:
This is perl, v5.8.8 built for i386-freebsd-64int
Description:
I call procedure many times from one program in the cycle. But only
first call determine right "upper range of Y axis". After first call the
"Y axis" remains the same. Every next call do not determine new "upper
range of Y axis". In other words the procedure creategraph is still
remembering the first "upper range of Y axis".
Example:
foreach $Zak (@Zak) {
...
my $htmgraf= creategraph(\@graf, \%options);
...
}
1st call: max Y value=645, creategraph set upper range of Y axis to 800;
2nd call: max Y value=100, creategraph set upper range of Y axis to 800;
3rd call: max Y value=1000, creategraph set upper range of Y axis to 800;
How to fix:
Everything is OK when you make next changes in GD/3DBarGrapher.pm:
"my (%dims) = getdimensions();^M" -> "my (%dims) = getdimensions(@data);"
"sub getdimensions {^M" -> "sub getdimensions { my (@data)=@_;"