oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

committing first round of GUID changes

Browse source
This commit is contained in:
JT Smith 2004-08-09 15:45:44 +00:00
parent 0ba6b7c911
commit 48fd2d44e9
48 changed files with 9012 additions and 8870 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Operation/Page.pm
View file

@ -570,8 +570,10 @@ sub www_editPageSave {
$session{form}{title} = "no title" if ($session{form}{title} eq "");
$session{form}{menuTitle} = $session{form}{title} if ($session{form}{menuTitle} eq "");
$session{form}{urlizedTitle} = $session{form}{menuTitle} if ($session{form}{urlizedTitle} eq "");
$session{form}{urlizedTitle} = WebGUI::Page::makeUnique(WebGUI::URL::urlize($session{form}{urlizedTitle}),$session{form}{pageId});
my $url = $session{form}{urlizedTitle};
$url = $session{form}{menuTitle} if ($url eq "");
$url .= ".".$session{setting}{urlExtension} unless ($url =~ /\./ && $session{setting}{urlExtension} ne "");
$url = WebGUI::Page::makeUnique(WebGUI::URL::urlize($url),$session{form}{pageId});
$page->set({
title => $session{form}{title},
styleId => $session{form}{styleId},
@ -587,7 +589,7 @@ sub www_editPageSave {
cacheTimeout => WebGUI::FormProcessor::interval("cacheTimeout"),
cacheTimeoutVisitor => WebGUI::FormProcessor::interval("cacheTimeoutVisitor"),
metaTags => $session{form}{metaTags},
urlizedTitle => $session{form}{urlizedTitle},
urlizedTitle => $url,
redirectURL => $session{form}{redirectURL},
languageId => $session{form}{languageId},
defaultMetaTags => $session{form}{defaultMetaTags},

9
lib/WebGUI/Operation/Settings.pm
View file

@ -64,8 +64,13 @@ sub www_editContentSettings {
$output .= '<h1>'.WebGUI::International::get(525).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("op","saveSettings");
$f->select("defaultPage",$pages,WebGUI::International::get(527),[$session{setting}{defaultPage}]);
$f->select("notFoundPage",$pages,WebGUI::International::get(141),[$session{setting}{notFoundPage}]);
$f->selectList("defaultPage",$pages,WebGUI::International::get(527),[$session{setting}{defaultPage}]);
$f->selectList("notFoundPage",$pages,WebGUI::International::get(141),[$session{setting}{notFoundPage}]);
$f->text(
-name=>"urlExtension",
-value=>$session{setting}{urlExtension},
-label=>WebGUI::International::get("url extension")
);
$f->text(
-name=>"favicon",
-label=>WebGUI::International::get(897),