fixing remaining bugs
This commit is contained in:
parent
dcbcaee880
commit
76c38edb44
3 changed files with 15 additions and 12 deletions
|
|
@ -69,7 +69,7 @@ sub create {
|
|||
my ($sequenceNumber) = WebGUI::SQL->quickArray("select max(sequenceNumber) from userProfileCategory");
|
||||
my $id = WebGUI::SQL->setRow("userProfileCategory","profileCategoryId",{profileCategoryId=>"new", sequenceNumber=>$sequenceNumber+1});
|
||||
my $self = $class->new($id);
|
||||
$self->update($properties);
|
||||
$self->set($properties);
|
||||
return $self;
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue