Credit Wouter Verhelst with V1.35

diff --git a/src/src/eximstats.src b/src/src/eximstats.src
index 533098459b9c04eac4c291dc3a4d2d9587ef287f..ed042e45171e84de7f390f9818a30bff013cd493 100644 (file)
--- a/src/src/eximstats.src
+++ b/src/src/eximstats.src
@@ -1,5 +1,5 @@
 #!PERL_COMMAND -w
 #!PERL_COMMAND -w

-# $Cambridge: exim/src/src/eximstats.src,v 1.3 2004/12/20 13:12:32 steve Exp $
+# $Cambridge: exim/src/src/eximstats.src,v 1.4 2004/12/21 11:33:55 steve Exp $

 
 # Copyright (c) 2001 University of Cambridge.
 # See the file NOTICE for conditions of use and distribution.
 
 # Copyright (c) 2001 University of Cambridge.
 # See the file NOTICE for conditions of use and distribution.


@@ -191,7 +191,7 @@
 # 2004-12-10  V1.34 Steve Campbell
 #             Eximstats can now parse syslog lines as well as mainlog lines.
 #
 # 2004-12-10  V1.34 Steve Campbell
 #             Eximstats can now parse syslog lines as well as mainlog lines.
 #

-# 2004-12-20  V1.35 Andreas Metzler
+# 2004-12-20  V1.35 Wouter Verhelst

 #            Pie charts by volume were actually generated by count. Fixed.
 
 
 #            Pie charts by volume were actually generated by count. Fixed.
 
 


@@ -1089,6 +1089,9 @@ else {
 $chartotherval = 0;
 my $use_gig = 0;
 foreach $key (top_n_sort($topcount,$m_data_gigs,$m_data,$m_count)) {
 $chartotherval = 0;
 my $use_gig = 0;
 foreach $key (top_n_sort($topcount,$m_data_gigs,$m_data,$m_count)) {

+  # The largest volume will be the first (top of the list).
+  # If it has at least 1 gig, then just use gigabytes to avoid
+  # risking an integer overflow when generating the pie charts. 

   if ($$m_data_gigs{$key}) {
     $use_gig = 1;
   }
   if ($$m_data_gigs{$key}) {
     $use_gig = 1;
   }