X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;ds=sidebyside;f=main.pl;fp=main.pl;h=249fe43cee77f1e7c71b1fa7b5e6f9f36de92d2e;hb=ebefd2fb237e23a0f0a189928d3059a54ebabbd5;hp=ef9fda8a1e36aac9a44edba2919e99e662d2af1d;hpb=1a2401c5ecba4d15756cadf0229d203ec5d6de54;p=ndwebbie.git

diff --git a/main.pl b/main.pl
index ef9fda8..249fe43 100644
--- a/main.pl
+++ b/main.pl
@@ -21,4 +21,13 @@ use strict;
 
 $ND::TEMPLATE->param(TITLE => 'Main Page');
 
-$ND::TEMPLATE->param(BODY => 'FUN!');
+our $BODY;
+
+$BODY->param(Username => 'harv');
+$BODY->param(isMEMBER => 1);
+$BODY->param(isHC => 1);
+my @groups = map {name => $_->{name}}, @ND::GROUPS;
+$BODY->param(Groups => \@groups);
+
+
+1;