Small changes

scc · Aug 29, 2002 · 6c4a299 · 6c4a299
1 parent 59cdf19
commit 6c4a299
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 6 deletions.
diff --git a/plugins/Zoo/Zoo.pm b/plugins/Zoo/Zoo.pm
@@ -93,7 +93,7 @@ sub countFoes {
 
 sub count {
 	my($self, $uid) = @_;
-	$self->sqlCount('people', "uid = $uid AND type != NULL");
+	$self->sqlCount('people', "uid = $uid AND type is not NULL");
 }
 
 sub _get {

diff --git a/plugins/Zoo/rebuildPeople b/plugins/Zoo/rebuildPeople
@@ -33,7 +33,10 @@ $slashdb->sqlDo("DELETE FROM people_log");
 $slashdb->sqlDo("UPDATE people SET eof=0 AND fof=0");
 my $entries = $slashdb->sqlSelectAll('uid, person, type', 'people');
 
+my $num = @$entries;
+my $x = 0;
 for (@$entries) {
+	print "NUM " . ($x++) . " for $num \n";
 	if ($_->[2] eq 'friend') {
 		$zoo->setFriend($_->[0], $_->[1]);
 	} elsif ($_->[2] eq 'foe') {

diff --git a/themes/slashcode/htdocs/topics.pl b/themes/slashcode/htdocs/topics.pl
@@ -13,13 +13,12 @@
 sub main {
 	my $slashdb = getCurrentDB();
 	my $form    = getCurrentForm();
-	my $section = $slashdb->getSection();
 
 	header(getData('head'));
 	print createMenu('topics');
 
 	if ($form->{op} eq 'toptopics') {
-		topTopics($section);
+		topTopics();
 	} else {
 		listTopics();
 	}
@@ -29,12 +28,10 @@ sub main {
 
 #################################################################
 sub topTopics {
-	my($section) = @_;
 	my $slashdb = getCurrentDB();
 	my $form = getCurrentForm();
 	my $constants = getCurrentStatic();
-
-	$section->{issue} = 0;  # should this be local() ?  -- pudge
+	my $section = $slashdb->getSection();
 
 	my(@topics, $topics);
 	$topics = $slashdb->getTopNewsstoryTopics($form->{all});