Redirect option added to pages.

This commit is contained in:
JT Smith 2002-08-12 01:19:16 +00:00
parent 7a6372b83f
commit 03f8af0961
5 changed files with 11 additions and 4 deletions

View file

@ -71,7 +71,8 @@ sub _recursePageTree {
synopsis,
templateId,
startDate,
endDate
endDate,
redirectURL
) values (
$newPageId,
$_[1],
@ -93,7 +94,8 @@ sub _recursePageTree {
".quote($package{synopsis}).",
".quote($package{templateId}).",
$newParent{startDate},
$newParent{endDate}
$newParent{endDate},
$newParent{redirectURL}
)");
_recursePageTree($package{pageId},$newPageId);
}

View file

@ -171,6 +171,7 @@ sub www_editPage {
$f->text("title",WebGUI::International::get(99),$page{title});
$f->text("menuTitle",WebGUI::International::get(411),$page{menuTitle});
$f->text("urlizedTitle",WebGUI::International::get(104),$page{urlizedTitle});
$f->url("redirectURL",WebGUI::International::get(715),$page{redirectURL});
$f->readOnly(WebGUI::Template::selectTemplate($page{templateId}),WebGUI::International::get(356));
$f->textarea("synopsis",WebGUI::International::get(412),$page{synopsis});
$f->textarea("metaTags",WebGUI::International::get(100),$page{metaTags});
@ -242,6 +243,7 @@ sub www_editPageSave {
endDate=$session{form}{endDate},
metaTags=".quote($session{form}{metaTags}).",
urlizedTitle='$session{form}{urlizedTitle}',
redirectURL='$session{form}{redirectURL}',
defaultMetaTags='$session{form}{defaultMetaTags}',
templateId='$session{form}{templateId}',
menuTitle=".quote($session{form}{menuTitle}).",