From 7d45fbce12124a0deac8308acb5f44bf30ab577c Mon Sep 17 00:00:00 2001
From: hjp <hjp>
Date: Fri, 19 Jan 2001 19:06:01 +0000
Subject: [PATCH] Removed superfluous "total" line. Fixed usage message.

---
 agestat/agestat.pl | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/agestat/agestat.pl b/agestat/agestat.pl
index c2dbf30..5e3c206 100755
--- a/agestat/agestat.pl
+++ b/agestat/agestat.pl
@@ -1,4 +1,7 @@
 #!@@@perl@@@ -w
+#
+# $Id: agestat.pl,v 1.4 2001-01-19 19:06:01 hjp Exp $
+#
 
 use strict;
 use File::stat;
@@ -18,7 +21,7 @@ if (!defined($opts{scale})) {
 } elsif ($opts{scale} eq 'M') {
     $scale = 1024*1024;
 } else {
-    print STDERR "Usage: $0 [-atime|-mtime] [-scale=(k|m)]\n";
+    print STDERR "Usage: $0 [-atime|-mtime] [-scale=(k|M)]\n";
     exit 1;
 }
 
@@ -75,5 +78,9 @@ for (my $i = 0; $i <= $#hist; $i++) {
     printf("%2d\t%s\t%12.0f\t%5.1f\t%12.0f\t%5.1f\n", $i,
 	   logtime2str($i), $h/$scale, $h * 100 / $sum, $c/$scale, $c * 100 / $sum);
 }
-print("#-------------------------------------------\n");
-printf("total\t\t%12.0f\t%5.1f\n",  $sum/$scale, $sum * 100 / $sum);
+
+# $Log: agestat.pl,v $
+# Revision 1.4  2001-01-19 19:06:01  hjp
+# Removed superfluous "total" line.
+# Fixed usage message.
+#