continuing dev on discussion
This commit is contained in:
parent
44b35c3412
commit
e3516d209e
3 changed files with 51 additions and 25 deletions
|
|
@ -47,7 +47,9 @@ sub set {
|
|||
my ($self, $data) = @_;
|
||||
$data->{forumId} = $self->get("forumId") unless ($data->{forumId});
|
||||
WebGUI::SQL->setRow("forum","forumId",$data);
|
||||
$self->{_properties} = $data;
|
||||
foreach my $key (keys %{$data}) {
|
||||
$self->{_properties}{$key} = $data->{$key};
|
||||
}
|
||||
}
|
||||
|
||||
1;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue