- my ($self, $name, $options, $max, $title, $legend, $iname, $oname) = @_;
- my $opt = join ', ', @$options, qw(withzeroes gauge growright nopercent integer);
+ my ($self, $name, $options, $max, $title, $legend, $iname, $oname, $yticsfactor) = @_;
+ my $opt = join ', ', @$options, qw(withzeroes growright nopercent integer);
+ $yticsfactor ||= 1;