Changeset 512

Show
Ignore:
Timestamp:
02/11/07 18:37:47 (6 years ago)
Author:
max
Message:

Bigger region graphs

Location:
util
Files:
2 modified

Legend:

Unmodified
Added
Removed

  • util/server_daily_maint

    r500 r512  
    683683        return unless ($rdata); 
    684684 
    685         my $gheight = 160; 
    686         my $gwidth = 320; 
     685        my $gheight = 220; 
     686        my $gwidth = 360; 
    687687        print "Generating pie graph $gname ..\n" if ($debug); 
    688688        my $graph = SVG::TT::Graph::Pie->new({ 
    … …  
    10681068        my $rdata = &gather_region_data("per_day", 0, 7); 
    10691069        my @regions = (); 
    1070         my $top = 5; # list top 5 
     1070        my $top = 10; # list top 5 
    10711071        foreach (sort { $rdata->{$b} <=> $rdata->{$a} } keys %$rdata) 
    10721072        { 

  • util/server_daily_maint_main.tmpl

    r498 r512  
    100100<tr><td align=left valign=top nowrap> 
    101101<h2>Regions</h2> 
    102 <p>Top 5 locations of unique systems<br> 
     102<p>Top 10 locations of unique systems<br> 
    103103in last week</p> 
    104104<TMPL_LOOP NAME=REGIONS>