From f00e5df1cdbb6796cb956bb8eb3b2aeab151a080 Mon Sep 17 00:00:00 2001
From: probe <probe>
Date: Fri, 14 Aug 1992 18:19:08 +0000
Subject: [PATCH] Corrected a spelling error. Took out old commented out code.
 If usage > allocation, consider allocation = usage...  (better bias)

---
 incremental/afs_utils.pl | 13 ++-----------
 1 file changed, 2 insertions(+), 11 deletions(-)

diff --git a/incremental/afs_utils.pl b/incremental/afs_utils.pl
index 75d1e489..29c47389 100644
--- a/incremental/afs_utils.pl
+++ b/incremental/afs_utils.pl
@@ -28,7 +28,7 @@ sub afs_lock
     open(SRV,"+<$afs_data") || die "Unable to open $afs_data\n";
     select((select(SRV), $|=1)[$[]);
     flock(SRV, $LOCK_EX) || die "Unable to lock $afs_data\n";
-    die "Temporary status file: $afs_save exists... abortin\n"
+    die "Temporary status file: $afs_save exists... aborting\n"
 	if (-f $afs_save);
     open(SRV2, ">$afs_save");
     @afs_data = <SRV>;
@@ -64,20 +64,11 @@ sub afs_find
     for (@afs_data) {
 	local ($a, $asrv, $apart, $t, $total, $used, $alloc) = split(/\s+/,$_);
 	next if ($a ne $cell || !$total || $type !~ /$t/);
+	$alloc = $used if ($alloc < $used);
 	$j = 2*$total - $used - $alloc;
 	@max = ($asrv,$apart,$j) if (! @max || $j > $max[2]);
     }
 
-#    truncate(SRV, 0);
-#    for (@afs_data) {
-#	($a, $asrv, $apart, $t, $total, $used, $alloc) = split(/\s+/,$_);
-#	if ($a eq $cell && $asrv eq $max[0] && $apart eq $max[1]) {
-#	    $alloc += $quota;
-#	    $_ = join(' ',$a,$asrv,$apart,$t, $total,$used,$alloc);
-#	}
-#	print SRV "$_\n";
-#    }
-
     &afs_unlock;
     return(@max);
 }
-- 
2.45.2