Add managed Friends network, allowing a designated group to add and remove

friends from each other groups.
This commit is contained in:
Colin Kuskie 2009-05-14 02:25:36 +00:00
commit 535621e8b6
7 changed files with 80 additions and 18 deletions

View file

@ -87,8 +87,6 @@ Optionally set bare to be true, or false.
=cut
public bare => my %bare;
#-------------------------------------------------------------------
=head2 store ( [ hashRef ] )
@ -102,7 +100,9 @@ A hash reference of data to store.
=cut
public store => my %store; #This is an all purpose hash to store stuff in: $self->store->{something} = "something"
public bare => my %bare; #This flag indicates that neither the layout nor style template should be applied
#to the output of the method. Think JSON/XML, etc.
#-------------------------------------------------------------------
=head2 appendCommonVars ( var )
@ -211,6 +211,9 @@ sub displayContent {
##Don't do any templating if we're sending back data like JSON or XML.
return $content if $self->bare;
##Don't do any templating if we're sending back data like JSON or XML.
return $content if $self->bare;
#Wrap content into the layout
my $var = {};
$var->{content} = $content;
@ -437,6 +440,7 @@ sub new {
$store { $id } = {};
$method { $id } = "view";
$uid { $id } = undef;
$bare { $id } = 0;
return $self;
}