From: jweiss <jweiss>
Date: Mon, 5 Jun 2000 05:01:49 +0000 (+0000)
Subject: update for users table schema change, and give split a number not an
X-Git-Url: http://andersk.mit.edu/gitweb/moira.git/commitdiff_plain/26534cc38971cbd81a9dcf7e08e9a7083d91a3f0

update for users table schema change, and give split a number not an
uninitalized variable
---

diff --git a/backup/report.sh b/backup/report.sh
index e13f227b..5e91389f 100644
--- a/backup/report.sh
+++ b/backup/report.sh
@@ -65,11 +65,11 @@ $total = 0;
 
 while (<USERS>) {
     s/\|/\e/g; s/\\\e/\|/g;
-    split(/\e/, $_, $27);
-    $total++; $STATUS{$_[7]}++;
-    if ($_[7] != 3) { $classtotal++; $CLASS{$_[9]}++; }
-    if ($_[7] == 1) { $CLASSA{$_[9]}++; }
-    if ($_[7] == 1 || $_[7] == 6) { $pototal++; $POTYPE{$_[25]}++; }
+    split(/\e/, $_, 28);
+    $total++; $STATUS{$_[8]}++;
+    if ($_[8] != 3) { $classtotal++; $CLASS{$_[10]}++; }
+    if ($_[8] == 1) { $CLASSA{$_[10]}++; }
+    if ($_[8] == 1 || $_[8] == 6) { $pototal++; $POTYPE{$_[26]}++; }
 }
 
 close(USERS);