fewer x values

[ndwebbie.git] / ND / Web / Graph.pm

diff --git a/ND/Web/Graph.pm b/ND/Web/Graph.pm
index 3f52b06b462ea1eccc3a9c216df92be5465012f9..6f5ff477b2d1e7e3aa4d4ed6832894f593676bea 100644 (file)
--- a/ND/Web/Graph.pm
+++ b/ND/Web/Graph.pm
@@ -52,7 +52,7 @@ sub graphFromQuery {
                }
 
        }
-       $graph_settings{x_label_skip} = int(1+(scalar @{$fields[0]}) / 10);
+       $graph_settings{x_label_skip} = int(1+(scalar @{$fields[0]}) / 6);
 
        my $graph = GD::Graph::lines->new($x,$y);
        $graph->set_legend(@{$query->{NAME}}[1..$fields]) or die $graph->error;