Fix file coverage stats for check/status commands

1 files changed, 1 insertions, 4 deletions

diff --git a/sbosrcarch b/sbosrcarch
index a73908c..e5a68f0 100755
--- a/sbosrcarch
+++ b/sbosrcarch
@@ -6,10 +6,6 @@ our $DEBUG_HTTP = 0;
 
 # TODO create_mode stats are wrong
 
-# FIXME 20180522 bkw: check and status commands include old
-# versions that haven't been purged in the total, so we get 112%
-# coverage and -1034 missing files!
-
 # FIXME 20151016 bkw: behold:
 #  $ grep ^D libraries/p4api/*.info
 #  DOWNLOAD="ftp://ftp.perforce.com/perforce/r10.1/bin.linux26x86/p4api.tgz"
@@ -1547,6 +1543,7 @@ sub check_byname_wanted {
 		$infofilecount{"$category/$prgnam"}--;
 	} else {
 		print "$shortname extraneous: not mentioned in $info (sbosrcarch purge)\n";
+		$filecount--;
 	}
 
 	if(blacklisted($category, $prgnam)) {