started migration process

This commit is contained in:
JT Smith 2004-12-03 00:55:26 +00:00
parent e1debee4ed
commit 95e9802896
3 changed files with 121 additions and 70 deletions

View file

@ -171,6 +171,27 @@ sub getEditForm {
-namespace=>$self->get("namespace"),
-afterEdit=>'func=edit&wid='.$self->get("wobjectId")."&namespace=".$self->get("namespace")
);
$tabform->getTab("layout")->template(
-name=>"styleTemplateId",
-label=>WebGUI::International::get(1073),
-value=>($page{styleId} || 2),
-namespace=>'style',
-afterEdit=>'op=editPage&npp='.$session{form}{npp}
);
$tabform->getTab("layout")->template(
-name=>"printableStyleTemplateId",
-label=>WebGUI::International::get(1079),
-value=>($page{printableStyleId} || 3),
-namespace=>'style',
-afterEdit=>'op=editPage&npp='.$session{form}{npp}
);
if ($childCount) {
$tabform->getTab("layout")->yesNo(
-name=>"recurseStyle",
-subtext=>'   '.WebGUI::International::get(106),
-uiLevel=>9
);
}
$tabform->getTab("properties")->HTMLArea(
-name=>"description",
-label=>WebGUI::International::get(85),