Fixed a bug where the pie height could not be set to 0

This commit is contained in:
Martin Kamerbeek 2006-05-09 16:10:38 +00:00
parent 7d061da0f9
commit b6cbd68529

View file

@ -1027,7 +1027,8 @@ Returns the thickness of the top of the pie in pixels. Defaults to 20 pixels.
sub getTopHeight { sub getTopHeight {
my $self = shift; my $self = shift;
return $self->{_pieProperties}->{topHeight} || 20; return 20 unless (defined $self->{_pieProperties}->{topHeight});
return $self->{_pieProperties}->{topHeight};
} }
#------------------------------------------------------------------- #-------------------------------------------------------------------