style and page template migrations complete

This commit is contained in:
JT Smith 2003-11-28 19:24:40 +00:00
parent de758d8dfe
commit 5d0faf0e3f
12 changed files with 354 additions and 409 deletions

View file

@ -663,8 +663,12 @@ sub new {
fieldType=>"hidden"
}
};
my %fullProperties;
my $extra = WebGUI::SQL->quickHashRef("select * from ".$properties->{namespace}." where wobjectId='".$properties->{wobjectId}."'");
tie %fullProperties, 'Tie::CPHash';
%fullProperties = (%{$properties},%{$extra});
bless({
_property=>$properties,
_property=>\%fullProperties,
_useTemplate=>$useTemplate,
_useDiscussion=>$useDiscussion,
_wobjectProperties=>$wobjectProperties,