X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=main.pl;h=3917873bb55ca50b951891e7c8e1caabd37738f0;hb=e8b88c192ac9a54ca2310d955677ad4b8be9c68e;hp=249fe43cee77f1e7c71b1fa7b5e6f9f36de92d2e;hpb=ebefd2fb237e23a0f0a189928d3059a54ebabbd5;p=ndwebbie.git

diff --git a/main.pl b/main.pl
index 249fe43..3917873 100644
--- a/main.pl
+++ b/main.pl
@@ -24,9 +24,9 @@ $ND::TEMPLATE->param(TITLE => 'Main Page');
 our $BODY;
 
 $BODY->param(Username => 'harv');
-$BODY->param(isMEMBER => 1);
-$BODY->param(isHC => 1);
-my @groups = map {name => $_->{name}}, @ND::GROUPS;
+$BODY->param(isMember => isMember());
+$BODY->param(isHC => isHC());
+my @groups = map {name => $_}, sort keys %ND::GROUPS;
 $BODY->param(Groups => \@groups);