fixed properties

This commit is contained in:
JT Smith 2009-10-23 18:17:59 -05:00
parent 908200869e
commit 1f522c31a7

View file

@ -1568,9 +1568,8 @@ sub new {
}
if (defined $properties) {
my $object = $class->instantiate;
my $object = $class->instantiate($properties);
$object->{_session} = $session;
$object->{_properties} = $properties;
foreach my $property ($object->getProperties) {
my $definition = $object->getProperty($property);
if ($definition->{serialize} && $object->{_properties}->{$property} ne '') {