X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=ND%2FWeb%2FPages%2FForum.pm;h=17ef00b5ce20fe76c7edd30e0edbe0d9ce3ea1bd;hb=31e4eaf3a4a406789d63f2c5d81c366091164404;hp=6cc441f87ff1af732438a923aac4392202b894f0;hpb=0185507641b0b46e3c97f13b1cef35d30375c99d;p=ndwebbie.git diff --git a/ND/Web/Pages/Forum.pm b/ND/Web/Pages/Forum.pm index 6cc441f..17ef00b 100644 --- a/ND/Web/Pages/Forum.pm +++ b/ND/Web/Pages/Forum.pm @@ -202,7 +202,6 @@ sub render { my @categories; while (my $category = $categories->fetchrow_hashref){ $boards->execute($category->{id},$ND::UID) or $ND::ERROR .= p($DBH->errstr); - #TODO: really need to do this outside, so you don't need moderate access my @boards; while (my $b = $boards->fetchrow_hashref){ @@ -216,8 +215,9 @@ sub render { } $BODY->param(Categories => \@categories); } - my ($category) = $DBH->selectrow_array(q{SELECT category FROM forum_categories WHERE fcid = $1} - ,undef,$board->{fcid}) or $ND::ERROR .= p($DBH->errstr); + my ($category) = $DBH->selectrow_array(q{SELECT category FROM forum_categories WHERE fcid = $1} + ,undef,$board->{fcid}) or $ND::ERROR .= p($DBH->errstr); + $BODY->param(Category => $category); }else{ #List boards $BODY->param(Overview => 1);